Funkcija Sin
Izračuna sinus kota. Kot se navaja v radianih. Rezultat je med -1 in 1.
Funkcija Sin izračuna na osnovi kota Alfa kvocient dolžin nasproti ležeče katete in hipotenuze v pravokotnem trikotniku.
Sin(Alfa) = nasproti ležeča kateta/hipotenuza
Skladnja:
Sin (Število)
Vrnjena vrednost:
Double
Parametri:
Število: Numeričen izraz, ki izraža kot v radianih, za katerega rabimo sinus.
Če želite stopinje pretvoriti v radiane, pomnožite vrednost z pi/180. Za pretvorbo iz radianov v stopinje pomnožite radiane z 180/pi.
gradi=(radiani*180)/pi
radiani=(gradi*pi)/180
Pi je približno 3,141593.
Primer:
' V tem primeru lahko za pravokotni trikotnik vnesete:
' dolžino nasproti ležeče katete in kot (v stopinjah), nakar se izračuna dolžina hipotenuze:
Sub ExampleSine
' Pi = 3,1415926 je predhodno definirana spremenljivka
Dim d1 As Double
Dim dAlpha As Double
d1 = InputBox("Vnesite dolžino nasproti ležeče katete: ","nasprotna kateta")
dKot = InputBox$("Vnesite kot Alfa (v stopinjah): ","Alfa")
Print "Dolžina hipotenuze je"; (d1 / sin (dKot * Pi / 180))
End Sub