Даны два произвольные одномерные массивы целых чисел М1 и М2 с одинаковым количест

Даны два произвольные одномерные массивы целых чисел М1 и М2 с одинаковым количеством элементов. Сформировать массив М3, элементами которого являются числа, образующиеся по формуле M3 [i] = M1 [i] + M2 [i].(СИ )
Гость
Ответ(ы) на вопрос:
Гость
Var m1,m2,m3:array of integer; i,n:integer; begin   write('Введите размер массивов');   readln(n);   setlength(m1,n);   setlength(m2,n);   setlength(m3,n);   //Заполнение массивов   for i:=0 to n-1 do begin     m1[i]:=random(21)-10;     m2[i]:=random(21)-10;     m3[i]:= m1[i]+m2[i];   end;   //Вывод массивов   for i:=0 to n-1 do write(m1[i]:4);   writeln;   for i:=0 to n-1 do write(m2[i]:4);   writeln;   for i:=0 to n-1 do write(m3[i]:4);   writeln; end. Тестовое решение: Введите размер массивов 10    7 -10   9  -4   8  -6  10   4   6   2   10  -3  -2  -7   1   9   2   3   5  -6   17 -13   7 -11   9   3  12   7  11  -4
Не нашли ответ?
Ответить на вопрос
Похожие вопросы