一段简洁的计算圆周率的c代码

[这个贴子最后由bigblock在 2003/11/18 09:40am 第 1 次编辑]

可以计算精确的800位圆周率值
long a=10000,b,c=2800,d,e,f[2801],g;
main(){for(;b-c;)f[b++]=a/5;
for(;d=0,g=c*2;c-=14,printf("%.4d",e+d/a),e=d%a))
for(b=c;d+=f*a,f=d%--g,d/=g--,--b;d*=b);}
已经测试