Предмет: Информатика,
автор: bendus777
Даны два произвольные одномерные массивы целых чисел М1 и М2 с одинаковым количеством элементов. Сформировать массив М3, элементами которого являются числа, образующиеся по формуле M3 [i] = M1 [i] + M2 [i].(СИ )
Ответы
Автор ответа:
0
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
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
Автор ответа:
0
Опсс не заметил (((
Автор ответа:
0
помоги плз ,если знаеш!
Автор ответа:
0
В Си не сильно разбираюсь(
Автор ответа:
0
ну хоть что то
Автор ответа:
0
помоги!
Похожие вопросы
Предмет: Физика,
автор: sidorova051103
Предмет: Геометрия,
автор: nikitarasov680
Предмет: Математика,
автор: natashada1
Предмет: Химия,
автор: innakar
Предмет: Алгебра,
автор: Эляюша