05-23-2003, 06:32 AM
I made my pi formula at http://www.geocities.com/pisforpi/ into a program.
CLS
n% = 21
IF n% = 0 THEN SYSTEM
j# = 0
FOR I% = 1 TO n% - 1
j# = (2 + j#) ^ .5
NEXT I%
j# = (2 - j#) ^ .5 * 2 ^ n%
PRINT j#
CLS
n% = 21
IF n% = 0 THEN SYSTEM
j# = 0
FOR I% = 1 TO n% - 1
j# = (2 + j#) ^ .5
NEXT I%
j# = (2 - j#) ^ .5 * 2 ^ n%
PRINT j#