Sin Function

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

Using the angle Alpha, the Sin function returns the ratio of the length of the opposite side of an angle to the length of the hypotenuse in a right-angled triangle.

Sin(Alpha) = side opposite the angle/hypotenuse

Sintaxia:


Sin (Number As Double) As Double

Itzulera-balioa:

Double

Parametroak:

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

To convert degrees to radians, multiply degrees by Pi/180, and to convert radians to degrees, multiply radians by 180/Pi.

degrees=(radians*180)/Pi

radians=(degrees*Pi)/180

Pi is approximately 3.141593.

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