Sin Function

Returnerar sinus för en vinkel. Vinkeln anges i radianer. Resultatet ligger mellan -1 och 1.

Med vinkeln Alfa returnerar funktionen Sin förhållandet mellan längden på den sida som befinner sig mittemot vinkeln och längden på hypotenusan i en rätvinklig triangel.

Sin(Alfa) = sidan mittemot vinkeln/hypotenusan

Syntax:

Sin (tal)

Returvärde:

Double

Parametrar:

Tal: Numeriskt uttryck som definierar den vinkel i radianer som du vill beräkna sinus för.

Du kan konvertera grader till radianer genom att multiplicera antalet grader med pi/180. Du kan konvertera radianer till grader genom att multiplicera antalet radianer med 180/pi.

grad=(radiant*180)/pi

radiant=(grad*pi)/180

Pi är ungefär 3,141593.

Exempel:

' I det här exemplet är den här inmatningen möjlig för en högervinklad triangel:

' Sidan mittemot vinkeln och vinkeln (i grader) för att beräkna längden på hypotenusan:

Sub ExampleSine

' Pi = 3,1415926 är en fördefinierad variabel

Dim d1 As Double

Dim dAlpha As Double

    d1 = InputBox("Ange längden på sida som befinner sig mittemot: ","Motsatt sida")

    dAlpha = InputBox("Ange vinkeln Alfa (i grader): ","Alfa")

    Print "Hypotenusans längd är"; (d1 / sin (dAlpha * Pi / 180))

End Sub