娱乐：输出π的前781位

int _tmain(int argc, _TCHAR* argv[])
{
long a = 10000,b = 0,c = 2800,d,e = 0,f[2801],g;


for(;b-c;)f[b++] = a / 5;
for(;d=0,g=c*2;c-=14,cout<<e+d/a,e=d%a)
for(b=c;d+=f[b]*a,f[b]=d%--g,d/=g--,--b;d*=b);
cin.get();
return 0;
}