C++~求圆周率，请注意:本程序在vc6.0下运行
#include <iostream>
using namespace std;
long a=10000,b=0,c=2800,d,e=0,f[2801],g;
int main()
{
    for(; b-c;)
    {
        f[b++]=a/5;
    }
    for(; d=0,g=c*2;)
    {
        for(b=c; d+=f[b]*a,f[b]=d%--g,d/=g--,--b; d*=b);
        c-=14;
        if(e+d/a==3141)
        {
            cout<<(e+d/a)*1.0/1000;
            e=d%a;
            continue;
        }
        if(e+d/a<10)
        {
            cout<<"000"<<e+d/a;
        }
        else if(e+d/a<100)
        {
            cout<<"00"<<e+d/a;
        }
        else if(e+d/a<1000)
        {
            cout<<"0"<<e+d/a;
        }
        else cout<<e+d/a;
        e=d%a;
    }
    cout<<"..."<<endl;
    return 0;
}
结果如下：
3.141592653589793238462643383279502884197169399375105820974944592307816406286208
99862803482534211706798214808651328230664709384460955058223172535940812848111745
02841027019385211055596446229489549303819644288109756659334461284756482337867831
65271201909145648566923460348610454326648213393607260249141273724587006606315588
17488152092096282925409171536436789259036001133053054882046652138414695194151160
94330572703657595919530921861173819326117931051185480744623799627495673518857527
24891227938183011949129833673362440656643086021394946395224737190702179860943702
77053921717629317675238467481846766940513200056812714526356082778577134275778960
91736371787214684409012249534301465495853710507922796892589235420199561121290219
60864034418159813629774771309960518707211349999998372978049951059731732816096318
5...



[ 本帖最后由 303770957 于 2013-9-12 15:17 编辑 ]

哦,对不起!应该在tc下运行!上面的发错了!看这个:
#include "stdio.h"
long a=10000,b=0,c=2800,d,e=0,f[2801],g;
void main()
{for(;b-c;)f[b++]=a/5;
for(;d=0,g=c*2;)
{
for(b=c;d+=f[b]*a,f[b]=d%--g,d/=g--,--b;d*=b);
c-=14;
if(e+d/a==3141)
{printf("Pai=%.3f",(e+d/a)*1.0/1000);e=d%a;continue;}
if(e+d/a<10)
printf("000%d",e+d/a);
else if(e+d/a<100)
printf("00%d",e+d/a);
else if(e+d/a<1000)
printf("0%d",e+d/a);
else printf("%d",e+d/a);
e=d%a;
}
printf("\n");
getch();
}

呵呵，怎么没人赏脸呢？

Pai=3.14159265358979323846264338327950288419716939937510582097494459230781640628
62089986280348253421170679821480865132823066470938446095505822317253594081284811
17450284102701938521105559644622948954930381964428810975665933446128475648233786
78316527120190914564856692346034861045432664821339360726024914127372458700660631
55881748815209209628292540917153643678925903600113305305488204665213841469519415
11609433057270365759591953092186117381932611793105118548074462379962749567351885
75272489122793818301194912983367336244065664308602139494639522473719070217986094
37027705392171762931767523846748184676694051320005681271452635608277857713427577
89609173637178721468440901224953430146549585371050792279689258923542019956112129
02196086403441815981362977477130996051870721134999999837297804995105973173281609
63185...........