Дан массив из n чисел найти средне арифметическое
// PascalABC.NET 3.1, сборка 1174 от 22.02.2016
begin
Writeln(ArrRandom(ReadInteger(n=),-10,20).Println.Average)
end.
Тестовое решение:
n= 10
12 -1 7 12 -8 5 19 1 -1 0
4.6
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
