N - Factorial — 1-ден N-ге дейінгі сандардың кобейтіндісі. Берілген N саны үшін, N - Factorialсанының соңында қанша нөл бар екенін анықтаныз.
Мәліметтерді енгізу форматы
Енгізу файлында бір бүтін сан — N (1 ≤ N ≤ 106) берілген.
Мәліметтерді шығару форматы
N - Factorial санының соңындағы нөлдер санын шығарыңыз.
Мысал / Пример
A.in A.out Комментарий
4610 012 1*2*3*4=241*2*3*4*5*6=7201*2*3*4*5*6*7*8*9*10=3628800
Program esepA;
label 1;
var n,i,s:integer;
f:longint;
f1,f2:text;
begin
assign(f1,’a.in’); reset(f1);
assign(f2,’a.out’); rewrite(f2);
readln(f1,n);
f:=1;
for i:=1 to n do f:=f*i;
s:=0;
for i:=1 to n do if f mod 10=0 then
begin
s:=s+1;
f:=f div 10;
end
else goto 1;
1:writeln(f2,s);
close(f2); close(f1);
end.
Осыны түсіндіріп беріңіздерші!!!
Өтініш, рахмет.