дано натуральное число N найти количество нулей в этом числе

Question

Информатика

Федоза

16 марта, 22:07

дано натуральное число N найти количество нулей в этом числе

+1

Ответы (1)

Знаете ответ?

Мишуня · Answer 1

Var

n, c : integer;

begin

c : = 0;

read (n) ;

while (n > 0) do

begin

if (n mod 10 = 0) then c : = c + 1;

n : = n div 10;

end;

write (c) ;

end.