:в массиве из 8 элементов, заполненном числами в диапазоне от -12 до 12, найти среднее арифметическое, произведение отриц. чисел, кол-во четных и элемент 1. создание массива 2. заполнение массива 3. посчитать 4. вывод )

// PascalABC.NET 3.3, сборка 1634 от 14.02.2018

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

begin

  var mas:=ArrRandom(8,-12,12); mas.Println;

 Writeln('среднее арифметическое=',mas.Average);

 Writeln('произведение отриц. чисел=',mas.Where(t->t<0).Aggregate(biginteger(1),(x,y)->x*y));

 Writeln('кол-во четных=',mas.Where(t->t mod 2=0).Count);

 Writeln('максимальный элемент=',mas.Max);

end.