Sin Function
Vraca sinus ugla. Ugao je izrazen u radijanima. Rezultat lezi u opsegu od -1 do +1.
Koristeci ugao Alfa, Sin Funkcija vraca omjer duzine suprotne strane ugla prema duzini hipotenuze u pravouglom trouglu.
Sin(Alfa) = strana suprotna uglu/hipotenuza
Sintaksa:
Sin (Broj)
Vrati vrijednost:
Double
Parametri:
Number: Brojcani izraz koji definise ugao u radijanima za koji zelite da izracunate sinus.
Da bi pretvorili stepene u radijane, pomnozi stepen sa Pi/180. Da bi pretvorili radijane u stepene, pomnozi radijane sa 180/Pi.
stepeni=(radijani*180)/Pi
radijani=(stepeni*Pi)/180
Pi je konstantna vrijednost kruga koja je zaokruzena na 3.1415926...
Primjer:
REM U ovom primjeru, slijedeci unos je moguc za pravougli trougao:
REM Strana suprotna uglu i ugao (u stepenima) za izracunavanje duzine hipotenuze:
Sub ExampleSine
REM Pi = 3.1415926... je predefinirana varijabla
Dim d1 As Double
Dim dAlpha As Double
d1 = InputBox("Unesite duzinu suprotne strane: ","Suprotna Strana")
dAlpha = InputBox("Unesite ugao Alfa (u stepenima): ","Alfa")
Ispis "Duzina hipotenuze je"; (d1 / sin (dAlpha * Pi / 180))
End Sub