Cod sursa(job #876558)

Utilizator roxannemafteiuMafteiu-Scai Roxana roxannemafteiu Data 11 februarie 2013 21:34:51
Problema Patrate2 Scor 100
Compilator c Status done
Runda Arhiva de probleme Marime 0.63 kb
#include<stdio.h>
FILE *in,*out;

int a[10000],n,i,j;
void inmultire(int a[],int x)
{
    int i,t=0;
    for(i=1;i<=a[0];++i,t/=10)
        a[i]=(t+=a[i]*x)%10;
    while(t)
    {
        a[++a[0]]=t%10;
        t/=10;
    }
}
int main()
{
    in=fopen ("patrate2.in","rt");
    out=fopen ("patrate2.out","wt");
    fscanf(in,"%d", &n);
    a[0]=a[1]=1;
    for(i=1;i<=(n*n)/4;++i)
        inmultire(a,16);
            for(i=1;i<=n;++i)
            inmultire(a,i);
    if(n%2)
        inmultire(a,2);
    for(i=a[0];i>0;--i)
        fprintf(out,"%d",a[i]);
        fclose(in);
        fclose(out);
    return 0;
}