Вывести пять чисел,найти их сумму произведения и среднее арифметическое.
Числа любые.

//PascalABC.NET версия 3.3.1590 от 03.12.2017//Если программа не запускается, то обновите версиюbegin    var a := ArrRandomInteger(5, -50, 50);    writeln('Вывод = ', a);    writeln('Сумма = ', a.Sum);    writeln('Произведение = ', a.Aggregate(1, (x, y)-> x * y));    writeln('Среднее арифметическое = ', a.Sum / a.Count);end.