Cod sursa(job #675833)

Utilizator radu2004GOLD radu radu2004 Data 8 februarie 2012 12:32:57
Problema Factorial Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.39 kb
#include <stdio.h>
long p,s,n,i;
FILE *f,*g;


int main()
{ f=fopen ("fact.in","r");
  g=fopen ("fact.out","w");
  fscanf (f,"%ld",&p);
 for (i=1;i<=p;i++) {n=n+5;
                     if (s==5) n=n-5;
                     s=s+1;}
if (p==0) fprintf (g,"1");
      else if (p<0) fprintf (g,"-1");
            else fprintf (g,"%ld",n);


fclose(f);
fclose(g);
    return 0;
}