Fungsi Cos
Hitung cosinus dari suatu sudut. Sudut ditentukan dalam radian. Hasilnya terletak antara -1 dan 1.
Menggunakan sudut Alpha, Fungsi-Cos menghitung nilai panjang sisi yang berdekatan dengan sudut, dibagi dengan panjang sisi miring dalam segitiga siku-siku.
Cos(Alpha) = Berdekatan/Miring
Sintaksis:
Cos (Angka)
Nilai hasil:
Ganda
Parameter:
Number: Ekspresi numerik yang menentukan sudut dalam radian yang ingin Anda hitung cosinusnya.
Untuk mengonversi derajat ke radian, kalikan dengan pi/180/. Untuk mengonversi radian ke derajat, kalikan radian dengan 180/pi.
degree=(radian*180)/pi
radian=(degree*pi)/180
Pi di sini adalah konstanta lingkaran dengan nilai bulat 3.14159...
Contoh:
' Contoh berikut memungkinkan masukan segitiga siku-siku
' garis potong dan sudut (dalam derajat) dan menghitung panjang sisi miring:
Sub ExampleCosinus
' bulat Pi = 3.14159
Dim d1 As Double, dAngle As Double
d1 = InputBox("Masukkan panjang sisi yang berdekatan: ","Berdekatan")
dAngle = InputBox("Masukkan sudut Alpha (dalam derajat): ","Alpha")
Cetak "Panjang sisi miringnya adalah"; (d1 / cos (dAngle * Pi / 180))
End Sub