BCX Console Demonstration Program s133.bas

'Classic method for calc'ing PI 

PRINT "PI = "; ATN(1.0) * 4.0

Result:

PI =  3.14159265358979