Ответы на вопрос:
//pascalabc v3.1
var s: string;
procedure repall(var s: string; wold, wnew: string);
var res: string;
p, len: integer;
begin
len: = length(wold);
res: = '';
while length(s) > 0 do begin
p: = pos(wold, s);
if p = 0 then begin res: = res + s; break; end;
if p > 1 then res: = res + copy(s,1,p-1);
res: = res + wnew;
if p+len > length(s) then
s: = ''
else s: = copy(s,p+len,length(s));
end;
s: = res
end;
begin
readln(s);
repall(s, 'со', 'ту');
writeln(s)
end.
тестовое решение:
сок сок сок кок пок
тук тук тук кок пок
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
машкооо18.10.2020 20:12
-
gnatiuk198101.12.2020 13:29
-
adelya60605.09.2020 07:07
-
катя506225.03.2021 23:11
-
рыжик5913.01.2021 23:30
-
Annakuznetsova200609.10.2022 22:33
-
Lizzzas28.06.2020 14:28
-
1903vita14.01.2023 01:45
-
kharina030919.04.2020 00:09
-
TigerForceCasual31.01.2023 00:52
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.