Опубликовано 12.06.2017 по предмету Информатика от Гость >> <<

Паскаль
Составьте программу, которая заменяет в строке S слово "мама" на слово "папа" Пример ввода: Мама играет с ребенком. Пример вывода: Папа играет с ребенком.

Ответ оставил Гость

Var
i:integer;
s:string;
begin
readln(s);
i := Pos(мама, s); 
if i > 0 then
 begin  
Delete(s, i, 4);  
Insert(папа, s, i); 
end;
writeln(s);
end.