//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. пример: мыльная пена состоит из мыла. выльная пена состоит из выла.
Pavlov447
16.05.2020
#include < cctype> #include < algorithm> #include < cmath> #include < iomanip> #include < windows.h> #include < conio.h> #include < set> #include < iostream> #include < string> #include < vector> using namespace std; int main(){ int a, b,f=0,f1=0,ans=0; cin > > a > > b; if (a < 0 ) f = 1; if (b < 0) f1 = 1; for (int i = 0; i < abs(b); i++) { ans += a; } if (f == 1 & & f1 == 1) cout < < abs(ans); else if (f == 1 || f1 == 1) cout < < '-' < < abs(ans); else cout < < ans; return 0; }