Sin Function

Sin laskee kulman sinin. Kulma on radiaaneissa. Tulos on vÀlillÀ -1 ... 1.

KÀyttÀen alfa-kulmaa, Sin-funktio laskee kulman vastaisen sivun ja hypotenuusan pituuksien suhteen suorakulmaisessa kolmiossa.

Sin(alfa) = vastakkainen sivu/hypotenuusa

Syntaksi:

Sin (luku1)

Palautusarvo:

Double

Parametrit:

Luku: numeerinen lauseke, joka mÀÀrittÀÀ sen kulman radiaaneissa, jolle halutaan laskea sini.

Asteiden muuntamiseksi radiaaneiksi, kerro radiaanit termillÀ Pi/180. Radiaanien muuntamiseksi asteiksi, kerro radiaanit termillÀ 180/Pi.

asteet=(radiaanit*180)/Pi

radiaanit=(asteet*Pi)/180

Pi on likiarvona piistÀ noin 3,141593.

Error codes:

5 Virheellinen proseduurikutsu

Esimerkki:

' TÀssÀ esimerkissÀ, kÀyttÀjÀ voi tehdÀ seuraavat syötteet suorakulmaiselle kolmiolle:

' Kulman vastainen sivu ja kulma (asteissa), joista lasketaan hypotenuusan pituus:

Sub ExampleSine

' Pi = 3.1415926 on ennalta mÀÀritelty muuttuja

Dim d1 As Double

Dim dAlpha As Double

    d2 = InputBox("Anna alfa-kulman vastaisen sivun pituus: ","Vastainen kateetti")

    dAlpha= InputBox("Anna alfa-kulma (asteissa): ","Alfa")

    Print "Hypotenuusan pituus on"; (d1 / sin (dAlpha * Pi / 180))

End Sub