Question

Заданы массивы A и B из N чисел (N=10), случайным образом сформировать новый массив, каждый элемент которого равен сумме элементов этих массивов.

Answer 1

//PascalABC.NET (версия 3.1, сборка 1196 от 09.03.2016)
const n = 10;
begin
  var a:=ArrRandom(n,-10,10);
  a.Println;
  var b:=ArrRandom(n,-10,10);
  b.Println;
  var c:array[0..n-1] of integer;
  for var i:=0 to 9 do c[i]:=a[i]+b[i];
  c.println;
end.