Module Module1
Sub Main()
Console.WriteLine("Math.Acos(0) = {0}", Math.Acos(0))
Console.WriteLine("Math.Acos(-1) = {0}", Math.Acos(-1))
Console.WriteLine("Math.Acos(1) = {0}", Math.Acos(1))
Console.WriteLine("Math.Acos(0.5) = {0}", Math.Acos(0.5))
End Sub
End Module
'run:
'
' Math.Acos(0) = 1.5707963267949
' Math.Acos(-1) = 3.14159265358979
' Math.Acos(1) = 0
' Math.Acos(0.5) = 1.0471975511966