Sin funtzioa

Angelu baten sinua itzultzen du. Angelua radianetan zehazten da. Emaitza -1 eta 1 artekoa da.

Alfa angelua erabiliz, Sin funtzioak angeluzuzen batean angeluaren aurkako aldearen luzeraren eta hipotenusaren luzeraren arteko proportzioa itzultzen du.

Sin(Alfa) = angeluaren aurkako aldea/hipotenusa

Sintaxia:

Sin (Zenbakia)

Itzulera-balioa:

Double

Parametroak:

Zenbakia: sinua kalkulatu behar zaion angelua radianetan zehazten duen zenbakizko adierazpena.

Graduak radian bihurtzeko, egin graduak bider Pi/180, eta radianak gradu bihurtzeko, egin radianak bider 180/Pi.

graduak=(radianak*180)/pi

radianak=(graduak*pi)/180

Pi gutxi gorabehera 3,141593 da.

Errore-kodeak:

5 Prozedura-deia ez baliozkoa

Adibidea:

' Adibide honetan, ondorengo sarrera posible da triangelu angeluzuzen batentzat:

' Angeluaren aurkako aldea eta angelua (gradutan) hipotenusaren luzera kalkulatzeko:

Sub ExampleSine

' Pi = 3,1415926 aurrez definitutako aldagaia da

Dim d1 As Double

Dim dAlpha As Double

    d1 = InputBox("Sartu aurkako aldearen luzera: ","Aurkako aldea")

    dAngelua = InputBox("Sartu Alfa angelua (gradutan): ","Alfa")

    Print "Hipotenusaren luzera honakoa da:"; (d1 / sin (dAngelua * Pi / 180))

End Sub