Сгененировать случайным образом массив целых чисел из n элементов. n ввести со стандартного ввода. Вывести на экран среднее арифметическое элементов
// PascalABC.NET 3.0, сборка 1128
begin
var n:=ReadInteger(Введите количество элементов:);
var a:=ArrRandom(n,-10,20);
a.Println(,);
WriteFormat(Среднее арифметическое равно {0},a.Average)
end.
Тестовое решение:
Введите количество элементов: 10
-2,6,6,-6,-6,16,18,15,14,7
Среднее арифметическое равно 6.8
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
