Ввести массив, состоящий из 12 элементов целого типа. Получить новый массив, заменив...

Question

Ввести массив, состоящий из 12 элементов целого типа. Получить новый массив, заменив значение пятого элемента среднеарифметическим исходного массива

Answer 1

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

begin
  var a:=ArrRandom(12,-50,50); a.Println;
  var b:=a.Select(t->real(t)).ToArray;
  b[4]:=a.Average; b.Println;
end.

Пример
3 -37 -3 13 33 27 -31 42 -34 16 -34 44
3 -37 -3 13 3.25 27 -31 42 -34 16 -34 44