Вопрос по информатике:
Программирование на паскале.
Найти среднее арифметическое положительных чётных чисел натурального ряда до N.
(Использование цикличного оператора for)
- 23.09.2017 17:19
- Информатика
- remove_red_eye 3842
- thumb_up 101
Ответы и объяснения 1
Uses crt;
var s:real; n,i,k:integer;
Begin
clrscr;
Write('n='); readln(n);
s:=0;
k:=0;
for i:=1 to n do
if i mod 2=0 then begin
s:=s+i;
k:=k+1;
end;
s:=s/k;
writeln('srednee=',s);
writeln;
End.
- 24.09.2017 01:24
- thumb_up 38
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.