void cher(int ar1[],int ar2[],int& ar3, int n) {int* ar3f=&ar3; int i1,i2=0; for(int i=0;i<n;i++) if(i%2==0) {ar3f[i]=ar1[i1]; i1++;} else {ar3f[i]=ar2[i2]; i2++;}}
Шуршилина_Ильич
07.08.2022
Программа с массивом (хотя он тут и не нужен): var a:array[1..60] of char; st:string; i,p:integer; begin writeln('Введите массив символов:'); readln(st); writeln('Вот массив:'); for i:=1 to length(st) do begin a[i]:=st[i]; write(a[i]); end; writeln; st:=' '+st+' '; p:=pos(' mama ',st); while p>0 do begin delete(st,p,6); insert(' ded ',st,p); p:=pos(' mama ',st); end; writeln('Измененный массив:'); for i:=1 to length(st)-2 do begin a[i]:=st[i+1]; write(a[i]); end; writeln; end.
Пример: Введите массив символов: mama papa okno mama primer baba Вот массив: mama papa okno mama primer baba Измененный массив: ded papa okno ded primer baba
Объяснение:
Ну в первом случае вывод будет 35
Во втором случае будет исключение, тк умножение двух строк