BCX Console Demonstration Program s24.bas

 ' 
 ' Calculate PI -- 
 ' 
 
 PRINT "PI =" & STR$(4.0 * ATN(1.0))