Написать программу через паскаль среднее арифметическое - вопрос №7488660 от nicita13254769p06wrf 03.09.2021 14:19

Question

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

nicita13254769p06wrf · Answer

// 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

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

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