位数很大的阶层和

#include<stdio.h>
int    main()
{
int    a[1001],b,c,d,n,i,z[1001];
while(~scanf("%d",&n)){
       for(i=0;i<1001;i++)
       z[i]=a[i]=-1;
z[0]=1;
for(b=1;b<=n;b++)
{
for(i=0;z[i]!=-1;i++)
z[i]=z[i]*b;
for(i=0;z[i]!=-1;i++)
if(z[i]>9)
{
d=z[i]/10;
z[i]=z[i]%10;
if(z[i+1]==-1)
z[i+1]=0;
z[i+1]=z[i+1]+d;
}
for(i=0;z[i]!=-1||a[i]!=-1;i++){
       if(a[i]==-1)
       a[i]=0;
a[i]=a[i]+z[i];
}
for(i=0;a[i]!=-1;i++)
if(a[i]>9)
{
d=a[i]/10;
a[i]=a[i]%10;
if(a[i+1]==-1)
a[i+1]=0;
a[i+1]=a[i+1]+d;
}
}
for(i=1000;a[i]==-1;i--)
i;
for(i;i>=0;i--)
printf("%d",a[i]);
}
return    0;
}