Trigonometric functions: Difference between revisions

Content added Content deleted
Line 4,659: Line 4,659:
1.0471975511965976 59.99999999999999</pre>
1.0471975511965976 59.99999999999999</pre>


=={{header|VBA}}==
<lang vb>Public Sub trig()
Pi = WorksheetFunction.Pi()
Debug.Print Sin(Pi / 2)
Debug.Print Sin(90 * Pi / 180)
Debug.Print Cos(0)
Debug.Print Cos(0 * Pi / 180)
Debug.Print Tan(Pi / 4)
Debug.Print Tan(45 * Pi / 180)
Debug.Print WorksheetFunction.Asin(1) * 2
Debug.Print WorksheetFunction.Asin(1) * 180 / Pi
Debug.Print WorksheetFunction.Acos(0) * 2
Debug.Print WorksheetFunction.Acos(0) * 180 / Pi
Debug.Print Atn(1) * 4
Debug.Print Atn(1) * 180 / Pi
End Sub</lang>{{out}}
<pre> 1
1
1
1
1
1
3,14159265358979
90
3,14159265358979
90
3,14159265358979
45
</pre>
=={{header|Visual Basic .NET}}==
=={{header|Visual Basic .NET}}==
{{trans|C#}}
{{trans|C#}}