Cod sursa(job #910542)

Utilizator gabrielinelusGabriel-Robert Inelus gabrielinelus Data 10 martie 2013 20:27:23
Problema Patrate2 Scor 100
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.61 kb
#include<cstdio>
FILE *f=fopen("patrate2.in","r"),*g=fopen("patrate2.out","w");
int a[3200],N;
void product(int x)
{
    int v=0,y,i;
    for(i=1;i<=a[0];++i)
    {y=a[i]*x+v;a[i]=y%10;v=y/10;}
    while(v>0)
    {
        a[0]++;
        a[a[0]]=v%10;v/=10;
    }
}

void afisare()
{
    int i;
    for(i=a[0];i>=1;i--)
        fprintf(g,"%d",a[i]);
}

int main()
{
    fscanf(f,"%d",&N);
    a[0]=1;
    a[1]=1;
    int y=(N*N)/15,z=(N*N)%15,i;
    for(i=1;i<=y;++i)
        product(32768);
    product(1<<z);
    for(i=1;i<=N;++i)
        product(i);
    afisare();
    return 0;
}