LibreOffice 7.3 Hjælp
Beregner cosinus af en vinkel. Vinklen er angivet i radianer. Resultatet ligger mellem -1 og 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
Double
Tal: Numerisk udtryk der specificerer en vinkel i radianer som du vil beregne cosinus til.
For at konvertere grader til radianer, gang grader med pi/180. For at konvertere radianer til grader, gang radianer med 180/pi.
grad=(radian*180)/pi
radian=(grad*pi)/180
Pi is here the fixed circle constant with the rounded value 3.14159...
REM Følgende eksempel tillader, for en retvinklet trekant, indtastningen af
REM sekant og vinkel (i grader) og beregner længden af hypotenusen:
Sub ExampleCosinus
REM afrundet Pi = 3,14159
Dim d1 As Double, dAngle As Double
d1 = InputBox("Angiv længden af den tilstødende side: ","Tilstødende")
dAngle = InputBox("Angiv vinklen Alfa (i grader): ","Alfa")
Print "Længden af hypotenusen er"; (d1 / Cos (dAngle * PI / 180))
End Sub