Одномерныемассивы А и В. Массив А состоитиз 5 частей А =

PascalABC.NET 3.4.2, сборка 1837 от 11.10.2018

Внимание! Если программа не работает, обновите версию!

begin

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

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

 var c := a.Zip(b, (p, q)-gt; 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.