IBM Lotus Symphony
|
Returnerer sinus til en vinkel. Vinkelen angis i radianer. Resultatet ligger mellom -1 og 1.
Ved hjelp av vinkelen Alpha returnerer Sin-funksjonen forholdet mellom lengden av motsatt side av en vinkel og lengden på hypotenusen i en rettvinklet trekant.
Sin(Alpha) = siden motsatt vinkelen/hypotenusen
Sin (tall)
Dobbel
Tall: Numerisk uttrykk som definerer vinkelen i radianer som du vil beregne sinus til.
For å konvertere grader til radianer, må du multiplisere grader med Pi/180, for å konvertere radianer til grader må du multiplisere radianer med 180/pi.
grad=(radian*180)/pi
radian=(grad*pi)/180
Pi er ca. 3,141593.
REM I dette eksempelet er følgende oppføring mulig for en rettvinklet trekant:
REM Siden som er motsatt av vinkelen, og vinkelen (i grader) for å beregne lengden på hypotenusen:
Sub ExampleSine
REM Pi = 3,1415926 er en forhåndsdefinert variabel.
Dim d1 as Double
Dim dAlpha as Double
d1 = InputBox$ ("Angi lengden på motsatt side: ","Motsatt side")
dAlpha = InputBox$ ("Angi vinkelen Alpha (i grader): ","Alpha")
Print "Lengden på hypotenusen er"; (d1 / sin (dAlpha * Pi / 180))
End Sub