Составьте программу, позволяющую проверить правописание "жи" и "ши" в строке s. Выведите на экран количество допущенных ошибок и исправленную строку.

1 ответ

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

Megamozg

2200

Var
b,i:integer;
S:string;
Begin
Readln(S);
b:=0;
For i:=1 to length(s) do
if i<length(s) then begin
if (s[i]='ж') or (s[i]='ш') then if s[i+1]='ы' then begin s[i+1]:='и'; b:=b+1; end;

End;
Writeln(b);
Writeln(s);
End.

Хороший ответ

17 декабря 2022 22:10

Остались вопросы?

Найти нужный

Еще вопросы по категории Информатика

Особенность мультимедийных продуктов: 1) наличие текста 2) возможность интерактивного взаимодействия 3) наличие графических изображений 4) наличие... В ячейке D2 электронной таблицы записана формула $A$1+B2.В Рисунок Ячейку В2 "протянули" вправо. Какой вид будет иметь формула в ячейке Е2?... Что будет напечатано после того, как выполнится следующий фрагмент кода? s := 'abrakadabra'; while pos('a', s) > 0 do begin x := pos('a', s);... Совокупность знаков, при помощи которых записываются числа, называется: а) системой счисления б) цифрами системы счисления в) алфавитном системы счисл... Как в памяти компьютера представляются целые положительные и отрицательные числа?...