Tangens-funksjon

Bestemmer tangenten til en vinkel. Vinkelen er spesifisert i radianer.

Ved Ä bruke vinkelen Alpha, beregner Tangens-funksjonen forholdet mellom lengden pÄ siden motsatt vinkelen og lengden pÄ siden ved siden av vinkelen i en rettvinklet trekant.

Tangens(Alfa) = side motsatt vinkelen/siden ved siden av vinkelen

Syntaks:


Tangens (antall som dobbel) som dobbel

Returverdi:

Double

Parametre:

Tall: Ethvert numerisk uttrykk som du vil beregne tangenten for (i radianer).

For Ă„ konvertere grader til radianer, multipliser med Pi/180. For Ă„ konvertere radianer til grader, multipliser med 180/Pi.

grader=(radianer*180)/Pi

radianer=(grader*Pi)/180

Pi er omtrent 3,141593.

Feilkoder

5 Ugyldig prosedyreoppkall

Eksempel:


' I dette eksemplet er fĂžlgende oppfĂžring mulig for en rettvinklet trekant:
' Siden motsatt vinkelen og vinkelen (i grader) for Ä beregne lengden pÄ siden ved siden av vinkelen:
Sub ExampleTangens
' Pi = 3.1415926 er en forhÄndsdefinert variabel
Dim d1 As Double
Dim dAlpha As Double
    d1 = InputBox("Skriv inn lengden pÄ siden motsatt vinkelen: ","motsatt")
    dAlpha = InputBox("Skriv inn alfavinkelen (i grader): ","Alpha")
    Skriv ut "lengden pÄ siden ved siden av vinkelen er"; (d1 / tangens (dAlpha * Pi / 180))
End Sub