Cos Function

Bir açının kosinüs değerini hesaplar. Açı radyan olarak tanımlanır. Sonuç -1 ile 1 arasındadır.

Using the angle Alpha, the Cos function calculates the ratio of the length of the side that is adjacent to the angle, divided by the length of the hypotenuse in a right-angled triangle.

Cos(Alpha) = Adjacent/Hypotenuse

Sözdizimi:


Cos (Number As Double) As Double

Dönüş değeri:

İki satır

Parametreler:

Sayı: Radyan olarak kosinüs değereini hesaplayacağınız açıyı belirten sayısal ifade

Dereceleri radyanlara çevirmek için dereceleri pi/180 ile çarpın. Radyanları derecelere çevirmek için, radyanları 180/pi ile çarpın.

degree=(radian*180)/pi

radian=(degree*pi)/180

Pi is here the fixed circle constant with the rounded value 3.14159...

Hata kodları:

5 Geçersiz yordam çağrısı

Örnek:


REM Takip eden örnek sağ açılı üçgene girdi için izin verir
REM sekant ve açı (derece olarak) ve hipotenüsün boyunu hesaplar:
Sub ExampleCosinus
REM yuvarlanmış Pi = 3.14159
Dim d1 As Double, dAngle As Double
    d1 = InputBox("Komşu kenarın boyunu gir: ","Komşu")
    dAngle = InputBox("Alfa açısını girin (derece olarak): ","Alpha")
    Print "Hipotenüsün uzunluğu"; (d1 / cos (dAngle * Pi / 180))
End Sub

Lütfen bizi destekleyin!