一维数组3

program OneDimensionalArray3;
const Num = 100;
var i, n : integer;
    a, b, m : array[1 .. Num] of integer;
begin
     readln(n);
     for i := 1 to n do
         readln(a[i], b[i]);
     for i := 1 to n do
     begin
          m[i] := a[i]+b[i];
          write(m[i], ' ');
     end;
     readln;
end.