Sin Fonksiyonu
Herhangi bir açının sinüsünü döndürür. Açı radyan cinsinden belirtilir. Sonuç -1 ve 1 arasındadır.
Sin işlevi, dik açılı bir üçgende Alfa açısını kullanarak açının karşısındaki kenarın uzunluğunun hipotenüsün uzunluğuna oranını döndürür.
Sin(Alfa) = açısının karşısındaki kenar/hipotenüs
Sözdizimi:
Sin (Sayı)
Dönen değer:
İki satır
Parametreler:
Sayı: Sinüsünü hesaplamak istediğiniz açıyı radyan cinsinden tanımlayan sayısal ifade.
Dereceyi radyana çevirmek için dereceyi Pi/180 ile çarpın; radyanı dereceye çevirmek için radyanı 180/Pi ile çarpın.
derece=(radyan*180)/pi
radyan=(derece*pi)/180
Pi yaklaşık olarak 3.141593'tür.
Örnek:
' Bu örnekte, aşağıdaki girdi dik açılı üçgen için mümkündür:
REM Hipotenüsün uzunluğunu hesaplamak için açının karşısındaki kenar ve açı (derece cinsinden)
Sub ExampleSine
REM Pi = 3.1415926 öntanımlı bir değişkendir
Dim d1 As Double
Dim dAlpha As Double
d1 = InputBox("Karşı kenarın uzunluğunu girin: ","Karşı Kenar")
dAlpha = InputBox("Alfa açısını girin (derece cinsinden): ","Alfa")
Print "Hipotenüsün uzunluğu"; (d1 / sin (dAlpha * Pi / 180))
End Sub