Даны два массива состоящих из 5 элементов А[5] и B[5] образовать новый массив С[5] каждый...

Question

Даны два массива состоящих из 5 элементов А[5] и B[5] образовать новый массив С[5] каждый элемент которого равен среднему арифметическому соотв. Элементу массива А и B (real)

Answer 1

PascalABC.NET 3.3.5, сборка 1650 от 01.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  var a:=SeqRandom(5,-99,99).Select(t->0.1*t).ToArray;
  a.Println;
  var b:=SeqRandom(5,-99,99).Select(t->0.1*t).ToArray;
  b.Println;
  var c:=a.Zip(b,(p,q)->(p+q)/2).ToArray; c.Println
end.

Пример
-8.4 -8.3 -0.1 -6.3 9.4
3.3 -7.4 -1.4 9.5 9.6
-2.55 -7.85 -0.75 1.6 9.5