Sqr(number)
For x = 0 To 16 Println "Square root of ",x," = ",Sqr(x) Next
pi = 4 * Atn(1) Println "Square root of pi = ",Sqr(pi)