Ответы
Ответ дал:
0
// 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
begin
Writeln(ArrRandom(ReadInteger('n='),-10,20).Println.Average)
end.
Тестовое решение:
n= 10
12 -1 7 12 -8 5 19 1 -1 0
4.6
Похожие вопросы
2 года назад
7 лет назад
7 лет назад
9 лет назад
9 лет назад
10 лет назад