Cod sursa(job #1222392)

Utilizator TarabanDragosTaraban Dragos-Petru TarabanDragos Data 23 august 2014 04:47:05
Problema Patrate2 Scor 100
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.68 kb
#include<cstdio>
long long n,i,j,p,v[100010];
FILE *f,*g;
void inm(long long v[],long long x){
    long long i=0,t=0,a;
    for(i=1;i<=v[0];i++){
        a=(v[i]*x+t)%10;
        t=(v[i]*x+t)/10;
        v[i]=a;
    }
    while(t!=0){
        v[++v[0]]=t%10;
        t/=10;
    }
}
int main(){
    f=fopen("patrate2.in","r");
    g=fopen("patrate2.out","w");
    fscanf(f,"%lld",&n);
    p=n*n;
    v[0]=v[1]=1;
    for(i=2;i<=n;i++){
        inm(v,i);
    }
    for(i=1;i<=p/30;i++){
        inm(v,(1<<30));
    }
    p=(n*n)%30;
    inm(v,(1<<p));
    for(i=v[0];i>=1;i--){
        fprintf(g,"%lld",v[i]);
    }
    fclose(f);
    fclose(g);
    return 0;
}