Одномерныемассивы а и в. массив а состоитиз 5 элементов а = {7, -5, -2, 6, 8} и массив в состоитиз 5 элементов в = {0, -1, -1, 0, 0}. вывести на экранмассив с, элементы котрого определяются как сумма соответствующих элементов массивов а и в.

begin

 var a := Arr(7, -5, -2, 6, 8);

 var b := Arr(0, -1, -1, 0, 0);

 var c := a.Zip(b, (p, q)-> p + q).ToArray;

 c.Println

end.

var

a:array [1..5] of integer ( значение данных );

b:array [1..5] of integer (значение ):

c:array [1..5] of iteger (значение);

i:integer;

begin

for i:=1 to 5 do

begin

c[i]:=a[i]+b[i];

writeln (i, '=', '  ' , c[i]);

end;

readln

end.