string CalcPI()
{
int a, b, c, d, e, g;
string S = "";
int[] f = new int[(c = 8400) + 1];
for (a = 10000, b = 0, d = 0, e = 0, g = 0; b != c; f[b++] = a / 5) ;
for (; (g = c * 2 + (d = 0)) != 0; c -= 14, S += (e + d / a).ToString("0000"), e = d % a)
for (b = c; b != 1; f[b] = (d += f[b] * a) % --g, d /= g--, d *= b--) ;
return S;
}

总共2400位,大家验证一下:

3141592653589793238462643383279502884197169399375

1058209749445923078164062862089986280348253421170

6798214808651328230664709384460955058223172535940

8128481117450284102701938521105559644622948954930

3819644288109756659334461284756482337867831652712

0190914564856692346034861045432664821339360726024

9141273724587006606315588174881520920962829254091

7153643678925903600113305305488204665213841469519

4151160943305727036575959195309218611738193261179

3105118548074462379962749567351885752724891227938

1830119491298336733624406566430860213949463952247

3719070217986094370277053921717629317675238467481

8467669405132000568127145263560827785771342757789

6091736371787214684409012249534301465495853710507

9227968925892354201995611212902196086403441815981

3629774771309960518707211349999998372978049951059

7317328160963185950244594553469083026425223082533

4468503526193118817101000313783875288658753320838

1420617177669147303598253490428755468731159562863

8823537875937519577818577805321712268066130019278

7661119590921642019893809525720106548586327886593

6153381827968230301952035301852968995773622599413

8912497217752834791315155748572424541506959508295

3311686172785588907509838175463746493931925506040

0927701671139009848824012858361603563707660104710

1819429555961989467678374494482553797747268471040

4753464620804668425906949129331367702898915210475

2162056966024058038150193511253382430035587640247

4964732639141992726042699227967823547816360093417

2164121992458631503028618297455570674983850549458

8586926995690927210797509302955321165344987202755

9602364806654991198818347977535663698074265425278

6255181841757467289097777279380008164706001614524

9192173217214772350141441973568548161361157352552

1334757418494684385233239073941433345477624168625

1898356948556209921922218427255025425688767179049

4601653466804988627232791786085784383827967976681

4541009538837863609506800642251252051173929848960

8412848862694560424196528502221066118630674427862

2039194945047123713786960956364371917287467764657

5739624138908658326459958133904780275900994657640

7895126946839835259570982582262052248940772671947

8268482601476990902640136394437455305068203496252

4517493996514314298091906592509372216964615157098

5838741059788595977297549893016175392846813826868

3868942774155991855925245953959431049972524680845

9872736446958486538367362226260991246080512438843

9045124413654976278079771569143599770012961608944

169486855584840635342207222582848864815845602850