Много ! написать программу которая находит среднее арифметическое элементов массива, состоящая из 100 элементов вещественного типа данных, вводимых вручную
104
197
Ответы на вопрос:
const n = 100;
var
mas : array [1..n] of real;
sum : real : = 0;
counter : integer : = 0;
begin
for var i : = 1 to n do begin
readln(mas[i]);
sum += mas[i];
counter += 1;
end;
writeln(sum/counter);
end.
Популярно: Информатика
-
buschckovaanas21.02.2023 07:43
-
Darya1706116.01.2021 22:02
-
Викусик125805.06.2022 07:48
-
МикаАбакирова07.01.2021 13:10
-
twentytw20.04.2020 13:44
-
nioniker08.02.2023 22:54
-
topovyyanTay05.04.2021 04:14
-
glupostsroghdeniy10.01.2022 22:08
-
Djamila110802.06.2023 23:53
-
skolzkov20044124.02.2022 14:08