нужно написать программу: создать одномерный массив из 500 элементов со значениями в пределах (-500, 500). найти сумму и среднеарифметическое значение элементов массива.

===== PascalABC.NET =====

begin

 var a := ArrRandom(500, -500, 500);

 a.Println; // строку убрать, если вывод массива не нужен

 Print('Сумма =', a.Sum, '  среднее арифметическое =', a.Average)

end.