Заполнить массив из 10 элементов от 1 до 100 и найти их среднее арифметическое
Заполнить массив из 10 элементов от 1 до 100 и найти их среднее арифметическое
Гость
Ответ(ы) на вопрос:
Гость // PascalABC.NET 3.1, сборка 1195 от 09.03.2016
begin
var a:=ArrRandom(10,1,100); a.Println;
Writeln('Ср.арифм.=',a.Average)
end.
Тестовое решение:
29 50 22 89 21 94 93 83 45 89
Ср.арифм.=61.5
Не нашли ответ?
Похожие вопросы