Вопрос по информатике:
Напишите программу, которая показывает количество нечетных чисел в числе. ( если можно, то без программы while и не слишком мудро)
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 21.06.2016 15:43
- Информатика
- remove_red_eye 16426
- thumb_up 8
Ответы и объяснения 1
Var
k:longint;
d,n:integer;
begin
Write('Введите натуральное число (1-2147483647): ');
Read(k);
n:=0;
while k>0 do begin
d:=k mod 10;
k:=k div 10;
if (d mod 2)0 then Inc(n)
end;
Writeln('Количество нечетных цифр в числе равно ',n)
end.
Тестовое решение:
Введите натуральное число (1-2147483647): 35632105
Количество нечетных цифр в числе равно 5
- 22.06.2016 04:40
- thumb_up 41
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.