Cod sursa(job #250453)

Utilizator shnakoVlad Schnakovszki shnako Data 30 ianuarie 2009 22:52:27
Problema Factorial Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.41 kb
Raporteaza aceasta sursa 
#include <stdio.h>
long p, t;
int main(void)
{
freopen("fact.in", "r", stdin);
freopen("fact.out", "w", stdout);
scanf("%ld", &p);
if (p==0)
	printf("1");
else
{
p=p-p/6;
t=p-(p/6)-(p/(5*6))-(p/(25*6))-(p/(125*6))-(p/(625*6))-(p/(3125*6))-(p/(15625*6))-(p/(78125*6))-(p/(390625*6*6))-(p/(1953125*6))-(p/(9765625*6))-(p/(48828125*6))-(p/(244140625*6));
printf("%ld", p*5);
}
fcloseall();
return 0;
}