Помогитеее решиииить пожалуйста!!! Даны два массива по 9 элементов [13-53]. Найти попарно их сумму. Результаты положить в 3-ий массив.
Answers & Comments
chern98
Var a,b,c:array[1..9] of Longint; i,k:longint; begin for i:=1 to 9 do begin read(a[i]); end; for i:=1 to 9 do begin read(b[i]); end; for i:=1 to 9 do begin c[i]:=a[i]+b[i]; write(c[i],' '); end; end.
Answers & Comments
begin
for i:=1 to 9 do
begin
read(a[i]);
end;
for i:=1 to 9 do
begin
read(b[i]);
end;
for i:=1 to 9 do
begin
c[i]:=a[i]+b[i];
write(c[i],' ');
end;
end.