Tan Function

Finder tangens til en vinkel. Vinklen angives i radianer.

Using the angle Alpha, the Tan function calculates the ratio of the length of the side opposite the angle to the length of the side adjacent to the angle in a right-angled triangle.

Tan(Alpha) = side opposite the angle/side adjacent to angle

Syntaks:


Tan (Number As Double) As Double

Returværdi:

Dobbelt

Parametre:

Tal: Ethvert numerisk udtryk, som du vil beregne tangenten til (i radianer).

To convert degrees to radians, multiply by Pi/180. To convert radians to degrees, multiply by 180/Pi.

degrees=(radians*180)/Pi

radians=(degrees*Pi)/180

Pi is approximately 3.141593.

Fejlkoder:

5 Ugyldigt Procedurekald

Eksempel:


REM I dette eksempel er følgende indtastninger mulige for en retvinklet trekant:
REM Siden overfor vinklen og vinklen (i grader) for at beregne længden på siden, der støder op til vinklen:
Sub ExampleTangens
REM Pi = 3,1415926 er en foruddefineret variabel
Dim d1 As Double
Dim dAlpha As Double
    d1 = InputBox("Indtast længden på siden der er modsat vinklen: ","Modsat")
    dAlpha = InputBox("Angiv vinklen Alfa (i grader): ","Alfa")
    Print "Længden på siden, der støder op til vinklen er"; (d1 / Tan (dAlpha * Pi / 180))
End Sub