Ответы на вопрос:
//pascalabc.net //версия 3.3. сборка 1583 (25.11.2017) var r,s: string; p: integer; begin read(s); r: =''; repeat p: =pos('мы',s); if p> 1 then r: =r+copy(s,1,p-1); if p> 0 then begin r: =r+'вы'; delete(s,1,p+length('мы')-1); end; until p=0; s: =r+s; write(s); readln; end. пример: мыльная пена состоит из мыла. выльная пена состоит из выла.
Популярно: Информатика
-
fox59031.10.2021 16:53
-
karinaandreevozb5ha28.12.2020 08:40
-
katkuatova17.06.2023 12:11
-
linagurova654525.07.2021 19:34
-
liza023430.11.2021 07:46
-
Abdueva07.11.2021 13:40
-
Gusein12302.11.2020 17:11
-
RusSh3204.10.2022 09:45
-
valeria23242524.06.2022 02:04
-
dorof07721.03.2020 09:16