Даны два массива по 9 элементов [13-53]. найти попарно их сумму. результаты положить в 3-ий массив.

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.