Помогите составить программу в паскале которая заменяет слог "му" ** слог "ло". Пожалуйста

0 голосов
23 просмотров

Помогите составить программу в паскале которая заменяет слог "му" на слог "ло". Пожалуйста


Информатика (144 баллов) | 23 просмотров
Дан 1 ответ
0 голосов

Var  s:string;  i:integer;begin  readln(s);  for i:=1 to length(s)-1 do    if s[i]+s[i+1]='му' then    begin      delete(s,i,2);      insert('ло',s,i);    end;  writeln(s);end.

http://mojainformatika.ru/paskal/uroki-paskal-stroki/118-standartnye-proczedury-i-funkczii-primenyae...

(616 баллов)
0

var
s:string;
i:integer;
begin
readln(s);
for i:=1 to length(s)-1 do
if s[i]+s[i+1]='му' then
begin
delete(s,i,2);
insert('ло',s,i);
end;
writeln(s);
end.

0

Там по ссылке описание функций delete, insert, а так же, pos, copy