Ответы на вопрос:
writeln('введите число');
for i :=1 to a do
begin
write('число ', 0+i, ' = ');
readln(m);
end;
for i:=1 to a do
begin
m:=m+mas[i];
end;
writeln('среднее арифм. ',g/a);
m - число
а - это количество чего-либо
Популярно: Информатика
-
Masha050103.01.2022 12:47
-
Alice54704.06.2023 14:13
-
nastyabelova0120.03.2022 12:17
-
EvaGRNV27.09.2021 23:15
-
алинкаблн14.05.2021 13:40
-
Safon198418.03.2023 10:27
-
Snihdsfg21.12.2020 18:32
-
nikitenkov2006604.07.2021 00:18
-
lisa1701200611.07.2022 23:34
-
бакыт606.12.2021 03:42