IBM Lotus Symphony


Funktionen Tan [Runtime]

Beregner en vinkels tangens. Vinklen er angivet i radianer.

Ud fra vinklen Alfa beregner funktionen Tan forholdet mellem længden på siden over for vinklen og længden på den side, der støder op til vinklen, i en retvinklet trekant.

Tan(Alfa) = side over for vinklen/ved siden af vinklen

Syntaks:

Tan(Tal)

Returværdi:

Double

Parametre:

Tal: Et numerisk udtryk, for hvilket du vil beregne tangens (i radianer).

Multiplicér grader med pi/180, hvis du vil konvertere grader til radianer. Multiplicér radianer med 180/pi, hvis du vil konvertere radianer til grader.

grader=(radianer*180)/pi

radianer=(grader*pi)/180

Pi er ca. 3,141593.

Fejlkoder

5 Ugyldigt procedurekald

Eksempel:

REM I dette eksempel kan følgende indgang angives for en retvinklet trekant:

REM Siden over for vinklen og vinklen (i grader), hvorefter længden på vinklens tilstødende side beregnes

Sub EksempelTangens

REM Pi = 3,1415926 er en foruddefineret variabel

Dim d1 As Double

Dim dAlfa As Double

d1 = InputBox$ ("Angiv længden på siden over for vinklen:","Over for")

dAlfa = InputBox$ ("Skriv vinklen Alfa (i grader): ","Alfa")

Print "Længden på vinklens tilstødende side er"; (d1 / Tan (dAlfa * Pi / 180))

End Sub


Produktfeedback | Yderligere dokumentation | Varemærker