Sin-funktion

Returnerer sinus af en vinkel. Vinklen er angivet i radianer. Resultatet ligger mellem -1 og 1.

Ved brug af Sin-funktionen på vinklen Alfa i en retvinklet trekant, hvor Alfa ikke er den rette vinkel, returnerer funktionen forholdet mellem længden af siden modsat vinklen Alfa og længden på hypotenusen.

Sin(Alfa) = side overfor vinklen/hypotenusen

Syntaks:

Sin (Tal)

Returværdi:

Double

Parametre:

Number: Numerisk udtryk, der i radianer definerer vinklen som du vil beregne sinus til.

For at konvertere grader til radianer, gang grader med pi/180, og for at konvertere radianer til grader, gang radianer med 180/pi.

grader=(radianer*180)/pi

radianer=(grader*pi)/180

Pi er cirka 3,141593.

Fejlkoder:

5 Ugyldigt Procedurekald

Eksempel:

REM I dette eksempel er følgende indtastninger mulige for en retvinklet trekant:

REM Siden overfor vinklen og vinklen (i grader) for at beregne længden af hypotenusen:

Sub ExampleSine

REM Pi = 3,1415926 er en foruddefineret variabel

Dim d1 As Double

Dim dAlpha As Double

    d1 = InputBox("Angiv længden af den modstående side: ","Modstående side")

    dAlpha = InputBox("Angiv vinklen Alfa (i grader): ","Alfa")

    Print "Længden af hypotenusen er"; (d1 / sin (dAlpha * Pi / 180))

End Sub