Introduction - If you have any usage issues, please Google them yourself
a calculation of the ratio of circumference wrote (with the original code). 40,000 can be calculated within the pi. After full optimization, speed very quickly. Platform : turbo-pascal 7.0, embedded in the compilation.
Packet : pi40000.zip filelist
P!.EXE
P!.PAS