' 
' Calculate PI -- 
' 

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

Result:

PI = 3.14159265358979