Заменить вторую букву в сочетании «ии» на букву «е» во всем тексте - Pascal ABC

Формулировка задачи:

Дан текст. Заменить вторую букву в сочетании «ии» на букву «е» во всем тексте.


textual

Код к задаче: «Заменить вторую букву в сочетании «ии» на букву «е» во всем тексте - Pascal ABC»

var s : string;
begin
  readln(s);
  while Pos('ии',s)>0 do s[Pos('ии',s)+1] := 'e';
  writeln(s);
end.
Эта работа вам не подошла?

Вы всегда можете заказать любую учебную работу у наших авторов от 20 руб.


СДЕЛАЙТЕ РЕПОСТ

7   голосов, оценка 4.286 из 5

Источник
Похожие ответы