IBM Lotus Symphony


Cos-funksjonen [kjøretid]

Beregner cosinus til en vinkel. Vinkelen angis i radianer. Resultatet ligger mellom -1 og 1.

Ved hjelp av vinkelen Alpha beregner Cos-funksjonen forholdet mellom lengden av siden nærmest vinkelen og lengden på hypotenusen i en rettvinklet trekant.

Cos(Alpha) = Tilstøtende/Hypotenus

Syntaks:

Cos (tall)

Returverdi:

Dobbel

Parametere:

Tall: Numerisk uttrykk som spesifiserer en vinkel i radianer som du vil beregne cosinus for.

For å konvertere grader til radianer må du multiplisere grader med pi/180. For å konvertere radianer til grader må du multiplisere radianer med 180/pi.

grader=(radian*180)/pi

radian=(grader*pi)/180

Pi er her den faste sirkelkonstanten med avrundet verdi 3,14159...

Feilkoder

5 Ugyldig prosedyrekall

Eksempel:

REM Det følgende eksempelet tillater for en rettvinklet trekant angivelse av

REM sekant og vinkel (i grader) og beregner lengden av hypotenusen:

Sub ExampleCosinus

REM avrundet Pi = 3,14159

Dim d1 as Double, dAngle as Double

d1 = InputBox$ (""Angi lengden på tilstøtende side: ","Tilstøtende")

dAngle = InputBox$ ("Angi vinkelen Alpha (i grader): ","Alpha")

Print "Lengden på hypotenusen er"; (d1 / cos (dAngle * Pi / 180))

End Sub


Tilbakemelding om produktet | Annen dokumentasjon | Varemerker