Fungsi Tan

Menentukan sudut garis singgung. Sudut ditentukan dalam radian.

Menggunakan sudut Alpha, Fungsi Tan menghitung rasio panjang sisi yang berlawanan dengan sudut dengan panjang sisi yang berdekatan dengan sudut dalam segitiga siku-siku.

Tan(Alpha) = sisi yang berlawanan sudut/sisi yang berdekatan dengan sudut

Sintaksis:


Tan (Angka)

Nilai hasil:

Ganda

Parameter:

Nomor: Ekspresi numerik apa pun yang ingin Anda hitung garis singgungnya (dalam radian).

Untuk mengonversi derajat ke radian, kalikan dengan Pi/180. Untuk mengonversi radian ke derajat, kalikan dengan 180/Pi.

degrees=(radiant*180)/Pi

radiant=(degrees*Pi)/180

Pi mendekati 3.141593.

Kode kesalahan:

5 Tidak sah dalam pemanggilan prosedur

Contoh:


' Dalam contoh ini, entri berikut memungkinkan untuk segitiga siku-siku:
' Sisi berlawanan dengan sudut dan sudut (dalam derajat) untuk menghitung panjang sisi yang berdekatan dengan sudut:
Sub ExampleTangens
' Pi = 3.1415926 adalah variabel yang ditentukan sebelumnya
Dim d1 As Double
Dim dAlpha As Double
    d1 = InputBox ("Masukkan panjang sisi yang berseberangan dengan sudut: ", "seberang")
    dAlpha = InputBox("Masukkan sudut Alpha (dalam derajat): ","Alpha")
    Cetak "Panjang sisi miringnya adalah"; (d1 / sin (dAlpha * Pi / 180))
End Sub

Mohon dukung kami!