Cod sursa(job #675837)

Utilizator cata_popescuPopescu Catalina cata_popescu Data 8 februarie 2012 12:43:05
Problema Factorial Scor 5
Compilator c Status done
Runda Arhiva de probleme Marime 0.56 kb
#include <stdio.h>
#include <stdlib.h>
long p, n, k, s, ok;
int main()
{
    FILE *f, *g;
    f=fopen("fact.in", "r");
    g=fopen("fact.out", "w");
    fscanf(f, "%ld", &p);
    k=5;
    if (p==0){fprintf(g,"1"); return 0;}
    for(n=10;n<=100000000;n+=5)
    {
        while(n/k>0)
        {
            s=s +n/k;
            k=k*k;
        }
        if(s==p)
        {
        fprintf(g, "%ld", n);
        break;
        ok=1;}
        else{ k=5; s=0;}
    }
    if(ok!=1){fprintf(g, "-1");}
    fclose(f);
    fclose(g);


    return 0;
}