1000 Factorial

//////////////////////////////////////////////////////////////////////////////
// Author : Mohammad Shafieenia
// Email : shafienia@gmail.com
//
// CopyRight License : CPOL
// For more information refer to : www.codeproject.com
//////////////////////////////////////////////////////////////////////////////

#include<iostream.h>
#include<conio.h>
#include<stdio.h>
#include<string.h>
#include<math.h>

void main()
{
clrscr();
int s[3000];
int a[3000];
int j,r,k;
register int i;
for(i=0;i<3000;i++)
 {
  s[i]=0;
  a[i]=0;
 }
a[2999]=1;
s[2999]=1;

for(k=1;k<1000;k++)
{
  for(j=0;j<k;j++)
   {
    for(i=2999;i>=0;i--)
     {
      r=s[i]+a[i];
      if(r>9)
       {
	s[i-1]+=r/10;
	s[i]=r%10;
       }
      else
       s[i]=r;
     }
   }
for(i=0;i<3000;i++)
 a[i]=s[i];
}
k=0;
for(i=0;i<3000;i++)
if (s[i]!=0 | k==1)
{
 cout<<s[i];
 k=1;
}
getch();
}