Function ng Kasalanan

Ibinabalik ang sine ng isang anggulo. Ang anggulo ay tinukoy sa radians. Ang resulta ay nasa pagitan ng -1 at 1.

Gamit ang anggulong Alpha, ang kasalanan function ay nagbabalik ng ratio ng haba ng kabaligtaran na bahagi ng isang anggulo sa haba ng hypotenuse sa isang right-angled triangle.

kasalanan (Alpha) = gilid sa tapat ng anggulo/hypotenuse

Kasalanan (Bilang Bilang Doble) Bilang Doble

Double

Numero: Numeric na expression na tumutukoy sa anggulo sa mga radian na gusto mong kalkulahin ang sine.

Upang i-convert ang mga degree sa radian, i-multiply ang mga degree sa pamamagitan ng Pi /180, at para i-convert ang radians sa degrees, i-multiply ang radians sa 180/ Pi .

degrees=(radians*180)/ Pi

radians=(degrees* Pi )/180

Pi ay tinatayang 3.141593.

' Sa halimbawang ito, ang sumusunod na entry ay posible para sa isang right-angled triangle:
' Ang gilid sa tapat ng anggulo at ang anggulo (sa mga degree) upang kalkulahin ang haba ng hypotenuse:
Sub ExampleSine
' Ang Pi = 3.1415926 ay isang paunang natukoy na variable
Dim d1 As Double
Dim dAlpha As Double
    d1 = InputBox("Ipasok ang haba ng kabaligtaran: ","Kabaligtaran")
    dAlpha = InputBox("Ipasok ang anggulong Alpha (sa mga degree): ","Alpha")
    I-print ang "Ang haba ng hypotenuse ay"; (d1 / sin (dAlpha * Pi / 180))
End Sub