Из слова "форма" получить слово "фирма" 2) дан текст "картографирования" получить слова граф, арт, роф. 3) сколько раз в заданном условии повторяется буква а.4) дано предложение ( s) подсчитать количество символов (а). решить , нужно.

186

302

Посмотреть ответы 2

Ответы на вопрос:

igorbrekk

Информатика

4,4(3 оценок)

Var s: string; i,k: integer; begin s: ='форма'; writeln('слово: ',s); s[2]: ='и'; writeln('получили слово: ',s); s: ='картографирования'; writeln('из слова: ',s); writeln('получили слова: ', copy(s,6,4),' ',copy(s,2,3), ' ', copy(s,11,2)+s[9]); writeln('введите предложение: '); readln(s); for i: =1 to length(s) do if (s[i]='а')or(s[i]='а') then k: =k+1; writeln('в заданном предложении буква а встречается ',k,' раз'); end.