Modül
İçerikler
Dizin 🔎︎

# Cos Fonksiyonu

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

Alfa açısını kullanarak, Cos fonksiyonu açıya komşu olan kenarın uzunluğunu ile dik açı ücgendeki hipotenüz uzunluğunun bölünmesi oranını hesaplar.

Cos(Alpha) = Adjacent/Hypotenuse

## Sözdizimi:

    Cos (Sayı)

## Dönen değer:

İ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 burada yuvarlanmış değeri ile 3.14159... olan sabit dairesel bir sabittir.

## 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