Вопрос по информатике:
даны Н целых чисел найти среднее арифметическое чисел/пожалуйста!!!
- 07.02.2018 21:58
- Информатика
- remove_red_eye 4284
- thumb_up 29
Ответы и объяснения 1
var
M: array [1..100] of integer;
s,i,n: integer;
begin
write('Введите кол-во чисел (n): ');
readln(n);
writeln('Введите ',n,' чисел:');
for i:= 1 to n do
begin
readln(M[i]);
s:=s+M[i];
end;
writeln('Среднее арифметическое: ',s/n);
end.
- 08.02.2018 23:59
- thumb_up 42
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.