Количество нулей в записи числа

@gridass · Регистрация: 14.10.2014

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

5.а.
1)Дано число N(N>9) определить количество нулей в записи числа, кроме нулей в младших разрядах данного числа. Пример, N=10207000,результат 2.
2)Последовательно вводятся числа, найти их произведение. Ввод остановить после ввода значения которое больше 50.
3)1+1/23+ 1/33+ 1/43+ 1/53+…

@кот Бегемот · 27.11.2014, 00:08

1.

Pascal

while a mod 10=0 do
a:=a div 10;
while a>0 do
begin
if a mod 10=0 then inc(k);
a:=a div 10;
end;
writeln(k);

2. факториал 50 - это очень большое число...

3.

Pascal

s:=1;
for i:=2 to n do
s:=s+1(10*i+3);
writeln(s);

@gridass 0 / 0 / 0 Регистрация: 14.10.2014 Сообщений: 33
		1
	Количество нулей в записи числа 26.11.2014, 23:54. Показов 2335. Ответов 1 Метки нет (Все метки) 5.а. 1)Дано число N(N>9) определить количество нулей в записи числа, кроме нулей в младших разрядах данного числа. Пример, N=10207000,результат 2. 2)Последовательно вводятся числа, найти их произведение. Ввод остановить после ввода значения которое больше 50. 3)1+1/23+ 1/33+ 1/43+ 1/53+… 0

	27.11.2014, 00:08

Количество нулей в записи числа

Решение