近来,在网上发现一个能精确计算PI后面数百位的C程序,不敢独享,把其翻译成PASCAL版,供大家参考,该函数写的非常精巧,仅用了三行代码,就能精确计算出PI后800位小数。小弟不才,对数学造诣不深,不明白他算法的原理是什么,如果有懂的请不吝赐规教。下面将该函数的C版和PASCAL版一并贴出,供大家参考。
///////////////////////////////////////////////////////////
// C语言 源程序 功能:精确计算PI小数点后799位小数
// 转自 http://www.programfan.net/club/showbbs.asp?id=16434
//
// #include stdlib.h
// #include stdio.h
// 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+...[ 查看全文 ]