Sisukord
Register 🔎︎

# 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