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

Result:

 PI = 3.14159265358979