IBM Lotus Symphony
|
Palauttaa kulman sinin. Kulma määritetään radiaaneina. Tulos on -1 - 1.
Alpha-kulman avulla Sin-funktio palauttaa kulman vastaisen sivun pituuden suhteessa hypotenuusan pituuteen suorakulmaisessa kolmiossa.
Sin(Alpha) = kulman vastainen sivu / hypotenuusa
Sin (Number)
Pitkä liukuluku
Number: Numeerinen lauseke, joka määrittää radiaaneina kulman, jonka sinin haluat laskea.
Voit muuntaa asteet radiaaneiksi kertomalla asteet arvolla pii/180. Voit muuntaa radiaanit asteiksi kertomalla radiaanit arvolla 180/pii.
aste=(radiaani*180)/pii
radiaani=(aste*pii)/180
Pii on noin 3,141593.
REM Tässä esimerkissä seuraava merkintä on mahdollinen suorakulmaisessa kolmiossa:
REM Voit laskea hypotenuusan pituuden kulman vastaisen sivun ja kulman avulla (asteissa):
Sub ExampleSine
REM Pii = 3,1415926
Dim d1 as Double
Dim dAlpha as Double
d1 = InputBox$ ("Enter the length of the opposite side: ","Opposite Side")
dAlpha = InputBox$ ("Enter the angle Alpha (in degrees): ","Alpha")
Print "The length of the hypotenuse is"; (d1 / sin (dAlpha * Pi / 180))
End Sub