LibreOffice 7.3 Help
Berekent de cosinus van een hoek. De hoek is gespecificeerd in radialen. Het resultaat ligt tussen -1 en 1.
Using the angle Alpha, the Cos function calculates the ratio of the length of the side that is adjacent to the angle, divided by the length of the hypotenuse in a right-angled triangle.
Cos(Alpha) = Adjacent/Hypotenuse
Cos (Number As Double) As Double
Dubbel
Getal: Numerieke expressie die een hoek in radialen specificeert waaruit de cosinus berekend moet worden.
Om graden naar radialen om te zetten vermenigvuldigt u graden met Pi / 180. Om radialen naar graden om te zetten vermenigvuldigt u radialen met 180 / Pi.
graad=(radiaal*180)/pi
radiaal=(graad*pi)/180
Pi is here the fixed circle constant with the rounded value 3.14159...
' Het volgende voorbeeld laat voor een rechthoekige driehoek de invoer toe van
' secans en hoek (in graden) en berekent de lengte van de hypotenusa:
Sub ExampleCosinus
' afgeronde Pi = 3,14159
Dim d1 As Double, dAngle As Double
d1 = Invoervak("Voer de lengte van de aangrenzende zijde in: ","Aangrenzend")
dHoek = InputBox("Voer de hoek Alfa (in graden) in: ","Alfa")
Print "De lengte van de hypotenusa is: "; (d1 / Cos (dHoek * Pi / 180))
End Sub