В данной строке S вставить символ c1 после каждого вхождения символа c2.

Question

Информатика

Митюня

1 февраля, 14:17

В данной строке S вставить символ c1 после каждого вхождения символа c2.

+2

Ответы (1)

Знаете ответ на вопрос?

Лаврентьич · Answer 1

var s1, s2, c1, c2:string;

i:integer;

Begin

read (s1, c1, c2) ;

for i: = 1 to length (s1) do begin

s2:=s2 + s1[i];

if s1[i]=c1 then s2:=s2+c2;

end;

writeln (s2) ;

End.