Одномерныемассивы А и В. Массив А состоитиз 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;
for i:=1 to 5 do
c[i]:=a[i]+b[i];
writeln (i, '=', ' ' , c[i]);
end;
readln