Дано натуральное число N (N > 9). Определить количество нулей в цифровой записи числа, кроме нулей в младших разрядах.
Пример: N = 10025000. Количество нулей равно двум.
спросил 18 Дек, 18 от cevka в категории школьный раздел


решение вопроса

+7
var n0: integer; n: longint;
 begin
  readln(n);
  while n mod 10 = 0 do n:= n div 10;
  n0:=0;
  while n<>0 do begin
    if n mod 10 = 0 then inc(n0);
    n:= n div 10;
   end;
  writeln(n0);
  readln;
 end.
ответил 18 Дек, 18 от Olenka

Связанных вопросов не найдено

Обучайтесь и развивайтесь всесторонне вместе с нами, делитесь знаниями и накопленным опытом, расширяйте границы знаний и ваших умений.

Популярное на сайте:

Как быстро выучить стихотворение наизусть? Запоминание стихов является стандартным заданием во многих школах. 

Как научится читать по диагонали? Скорость чтения зависит от скорости восприятия каждого отдельного слова в тексте. 

Как быстро и эффективно исправить почерк?  Люди часто предполагают, что каллиграфия и почерк являются синонимами, но это не так.

Как научится говорить грамотно и правильно? Общение на хорошем, уверенном и естественном русском языке является достижимой целью.