Вопрос по информатике:
подсчитайте количество чётных и нечётных среди десяти чисел взяты от 0 до 100 помогите пожалуйста
- 23.01.2018 13:10
- Информатика
- remove_red_eye 9735
- thumb_up 25
Ответы и объяснения 2
Всего чётных чисел от 0 до 100 - 50:2, 4, 6, ... 94, 96, 98, 100, ... - арифметическая прогрессияS50=n*(a1+a50)/2=50*(2+100)/2=50*51=2550 Аналогично:1, 2, 3, ... 95, 97, 99, ...S50=n*(a1+a50)/2=50*(1+99)/2=50*50=2500
- 24.01.2018 08:49
- thumb_up 35
Var i, chet, nechet: integer;
begin
for i:=0 to 100 do
if i mod 2=0 then inc(chet) else inc(nechet);
writeln(chet,'-количество четных);
writeln(nechet,'-количество нечетных);
end.
- 25.01.2018 14:05
- thumb_up 13
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.