谁能发个计算pi的程序？ for 9750GII/9860GII的

iFx

看看计算器编程能不能算高精度Pi

iFx

或者BASIC的也可以

imath

级数求和

urill

去移植这段程序吧，理论可以做到无限精度，就是比较浪费时间

1. #define _ -F<00||--F-OO--;
   
2. int F=00,OO=00;main(){F_OO();printf("%1.3f\n",4.*-F/OO/OO);}F_OO()
   
3. {
   
4.              _-_-_-_
   
5.         _-_-_-_-_-_-_-_-_
   
6.      _-_-_-_-_-_-_-_-_-_-_-_
   
7.    _-_-_-_-_-_-_-_-_-_-_-_-_-_
   
8.   _-_-_-_-_-_-_-_-_-_-_-_-_-_-_
   
9.   _-_-_-_-_-_-_-_-_-_-_-_-_-_-_
   
10. _-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_
    
11. _-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_
    
12. _-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_
    
13. _-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_
    
14.   _-_-_-_-_-_-_-_-_-_-_-_-_-_-_
    
15.   _-_-_-_-_-_-_-_-_-_-_-_-_-_-_
    
16.    _-_-_-_-_-_-_-_-_-_-_-_-_-_
    
17.      _-_-_-_-_-_-_-_-_-_-_-_
    
18.          _-_-_-_-_-_-_-_
    
19.              _-_-_-_
    
20. }

复制代码

http://www0.us.ioccc.org/1988/westley.c

diameter

去移植这段程序吧，理论可以做到无限精度，就是比较浪费时间 #define _ -F
urill 发表于 2011-2-13 19:44

很好……可以去参加ioccc了……

imath

没用的,为什么不用级数的方法?

iFx

不懂 C啊， 能输进VX-4去吗？

diameter

不懂 C啊， 能输进VX-4去吗？
iFx 发表于 2011-2-13 21:49

VX-4的内存我怀疑……

iFx

找到了一个C 的
#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+d/a),e=d%a)

for(b=c;d+=f[b]*a,f[b]=d%--g,d/=g--,--b;d*=b);

}

谁能改写下？

urill

很好……可以去参加ioccc了……
diameter 发表于 2011-2-13 20:07

本来就是ioccc 1988年获奖作品抄来的...

zhj

公式1

zhj

公式2，但愿能看清楚

diameter

本来就是ioccc 1988年获奖作品抄来的...
urill 发表于 2011-2-14 09:13

这个……

imath

120*160，果然看不清楚.

imath

切割法,不过不是切割成正多边形,而是竖着切,每一个x对应一个y,把这些y全部加起来,再乘以2

Cyvre

http://en.wikipedia.org/wiki/Pi
英文的维基百科是无敌的

cleansky

建议蒙特卡洛法，抽空我写一个

urill

这个精度没问题么

imath

不屑一顾。 这个MCA的N函数要多少位就有多少位。
还是编写一些有实际价值的函数吧

cleansky

18# urill
精度没有任何问题，而且可以很好的理解这种算法本质