IBM Lotus Symphony
|
Zwraca sinus kąta. Kąt jest określany w radianach. Wynik ma wartość z zakresu od -1 do 1.
Funkcja Sin oblicza stosunek długości przyprostokątnej leżącej naprzeciw kąta Alfa i przeciwprostokątnej w trójkącie prostokątnym.
Sin(Alfa) = przyprostokątna leżąca naprzeciw kąta/przeciwprostokątna
Sin (Liczba)
Liczba zmiennopozycyjna o podwójnej precyzji
Liczba: Wyrażenie liczbowe definiujące kąt w radianach, dla którego ma być obliczony sinus.
Aby zamienić stopnie na radiany, należy pomnożyć stopnie przez wartość Pi/180, a w celu przeliczenia radianów na stopnie należy pomnożyć radiany przez 180/Pi.
stopnie=(radiany*180)/pi
radiany=(stopnie*pi)/180
Pi jest w przybliżeniu równe 3,141593.
REM W tym przykładzie dla trójkąta prostokątnego wprowadzane są następujące wartości:
REM Długość przyprostokątnej naprzeciw kąta i kąt (w stopniach). Obliczana jest długość przeciwprostokątnej.
Sub Przyklad_Sine
REM Predefiniowana wartość Pi = 3,1415926
Dim d1 as Double
Dim dAlpha as Double
d1 = InputBox$ ("Wprowadź długość przyprostokątnej naprzeciw kąta: ","Przyprostokątna naprzeciw kąta")
dAlpha = InputBox$ ("Wprowadź kąt Alfa (w stopniach): ","Alfa")
Print "Długość przeciwprostokątnej to"; (d1 / sin (dAlpha * Pi / 180))
End Sub