Question

СРОЧНО ПОМОГИТЕ!!!!Вычислить и вывести на экран 75 целых чисел их среднее арифметическое сами числа заданы случайным образом из диапозона -5;5

Answer 1

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

begin
  ArrRandom(75,-5,5).Println.Average.Println
end.

Пример
2 3 3 5 4 -3 1 1 5 5 5 -1 -5 -3 -2 1 4 3 -2 -3 -4 1 -4 1 -5 4 0 -3 -4 1 -1 -4 0 -3 4 2 -5 2 -2 5 -1 0 -4 -1 5 4 -5 -1 -4 -5 3 -3 -1 -3 -3 -5 1 -3 4 5 3 -2 0 -1 1 3 4 3 -2 2 1 -3 0 -1 4
0.04