1 REM SIMPLE BBP PI CALCULATION
2 REM BY ARM_CODER 2025
10 PRINT "PI CALC BBP"
20 PI = 0
30 D = 1
40 FOR K = 0 TO 10
50 X = 8*K
60 PI = PI + (4/(X+1) - 2/(X+4) - 1/(X+5) - 1/(X+6)) / D
65 D = D * 16
70 NEXT K
80 PRINT "PI:"; : PRINT PI
90 END

