Дана строка текста,знаков препинания в строке нет.заменить все вхождения "киров" на "вятка" на паскале
254
329
Ответы на вопрос:
Var s: string; i: integer; begin readln(s); while pos('киров',s)< > 0 do begin i: =pos('киров',s); delete(s,pos('киров',s),5); insert('вятка',s,i); end; write(s); end.
Популярно: Информатика
-
timahipoDrakeylol30.12.2022 13:41
-
dani2d01.02.2020 16:24
-
АлияКью01.02.2021 02:04
-
denisskidan20118.05.2020 08:27
-
SakhanovMadiar103.06.2020 01:25
-
Fuvhrcsghinm07.09.2021 13:17
-
nimnogopozitiva11.09.2021 00:40
-
kupmvik01.09.2021 04:44
-
LadySmail20.10.2022 06:52
-
orixara128.01.2021 22:57