Найти количество нечётных цифр в числе

@KiRiLl1452 · Регистрация: 05.01.2016

Author24 — интернет-сервис помощи студентам

Цикл с проверкой условий. Задано число N. Напишите программу, которая находит количество нечётных цифр в заданном числе. Выведите количество нечётных цифр в заданном числе.

Примеры

45	1
-10023	2
999999	6

@Puporev · 11.03.2016, 16:28

Pascal

n:=abs(n);
k:=0;
while n>0 do
 begin
  if odd(n mod 10) then inc(k);
  n:=n div 10;
 end;

@KiRiLl1452 · 11.03.2016, 16:42 **[ТС]**

Можно без ABS и odd. Пожалуйста

@Cyborg Drone · 11.03.2016, 23:58

Можно... Неясно, правда, зачем это нужно.

Pascal

if n < 0 then n:=-n;
k:=0;
while n>0 do
 begin
  if n div 2 = 1 then inc(k);
  n:=n div 10;
 end;

Кстати, и у Puporev тоже можно немного упростить:

Pascal

5	if odd(n) then inc(k);

поскольку если последняя цифра нечётная, то и всё число нечётное.

@KiRiLl1452 0 / 0 / 2 Регистрация: 05.01.2016 Сообщений: 68
	11.03.2016, 16:42 [ТС]	3
	Можно без ABS и odd. Пожалуйста 0

	11.03.2016, 23:58

Найти количество нечётных цифр в числе

Решение