Задать два массива (одномерных), заполненные соучайными целыми числами, состоящие из 10 элементов. Затем вычислить элемент третьего массива, каждый из которых получается путём суммы соответствующих элементов первых двух массиво...
Задать два массива (одномерных), заполненные соучайными целыми числами, состоящие из 10 элементов. Затем вычислить элемент третьего массива, каждый из которых получается путём суммы соответствующих элементов первых двух массивов. Вывести новый массив.
Ответ(ы) на вопрос:
var
a,b,c:array[1..10]of integer;
i:integer;
begin
writeln('m 1:');
for i:=1 to 10 do
read(a[i]);
writeln('m 2:');
for i:=1 to 10 do
begin
read(b[i]);
c[i]:=a[i]+b[i];
end;
writeln('m 3:');
for i:=1 to 10 do
write(c[i],' ');
end.
Не нашли ответ?
Похожие вопросы