===== PascalABC.NET =====
begin
var a := ArrRandom(500, -500, 500);
a.Println; // строку убрать, если вывод массива не нужен
Print('Сумма =', a.Sum, ' среднее арифметическое =', a.Average)
end.
