Написать программу через паскаль среднее арифметическое ста чисел случайным образом в массиве от 50 до 100

zina0155 zina0155    1   29.08.2019 21:40    0

Ответы
89528849556keyz 89528849556keyz  06.10.2020 03:49
// PascalABC.NET 3.2, сборка 1417 от 28.03.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var a:=ArrRandom(100,50,100); a.Println;
  Writeln('m=',a.Average);
end.

Пример
79 81 50 65 72 67 78 88 89 61 54 71 56 90 84 93 62 57 52 59 58 53 98 83 63 61 57 68 85 98 68 93 50 88 60 96 51 97 71 90 89 62 93 78 55 59 97 72 72 90 64 74 57 87 72 75 84 68 51 60 60 60 52 92 94 62 70 69 79 88 91 65 86 62 70 96 61 69 77 54 65 86 96 96 84 94 85 64 65 85 62 84 96 60 80 79 59 51 85 94
m=73.82
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика