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.
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