Вопрос по информатике:
Составить программу вычисления суммы четных чисел от 1 до n. найдите среднее арифметическое этих чисел
- 18.02.2018 10:00
- Информатика
- remove_red_eye 1176
- thumb_up 37
Ответы и объяснения 1
Program help;var a,n,x,summa:integer;beginx:=0;a:=1;summa:=0;readln (n);while a<=n do beginif a mod 2 =0 thensumma:=summa+a;if a mod 2 =0 thenx:=x+1;a:=a+1;end;summa:=summa div x; writeln (summa);end.это на pascalAbc
- 19.02.2018 21:00
- thumb_up 40
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.