Tan funktsioon

MÀÀrab nurga tangensi. Nurk tuleb anda radiaanides.

Funktsioon Tan tagastab tĂ€isnurkse kolmnurga nurga alfa vastaskĂŒlje pikkuse suhte nurga kĂ”rvalkĂŒlje pikkusse.

Tan(alfa) = nurga vastaskaatet/nurga lÀhiskaatet

SĂŒntaks:


Tan (arv)

TagastusvÀÀrtus:

TopelttÀpsusega reaalarv

Parameetrid:

Arv: suvaline arvavaldis (radiaanides), mille tangensi soovid arvutada.

Kraadide teisendmiseks radiaanideks korruta pii/180. Radiaanide teisendamiseks kraadideks korruta 180/pii.

kraadid=(radiaanid*180)/pii

radiaanid=(kraadid*pii)/180

Pii on ligikaudu 3.141593.

Veakoodid:

5 Vigane protseduuri vÀljakutse

NĂ€ide:


REM Selles nÀites saab tÀisnurkse kolmnurga jaoks sisestada jÀrgmise kirje:
REM Nurga vastaskĂŒlg ja nurk (kraadides) nurga kĂ”rvalkĂŒlje pikkuse arvutamiseks:
Sub ExampleTangens
REM Pii = 3.1415926 on eeldefineeritud muutuja
Dim d1 As Double
Dim dAlpha As Double
    d1 = InputBox("Sisesta nurga vastaskaateti pikkus: ","vastas")
    dAlpha = InputBox("Sisesta nurk alfa (kraadides): ","alfa")
    Print "nurga lÀhiskaateti pikkus on"; (d1 / tan (dAlpha * pii / 180))
End Sub

Palun toeta meid!