Modül
İçerikler
Dizin 🔎︎

# Atn Fonksiyonu

Bir sayısal ifadenin arctanjantını döndüren trigonometrik fonksiyondur. Dönen değer -Pi/2 ile +Pi/2 aralığındadır.

Arktanjant, tanjant fonksiyonunun tersidir. Atn fonksiyonu, radyanlarda tanımlı "Alpha" açısını, bu açının tanjantını kullanarak döndürür. Fonksiyon ayrıca bir dik üçgende, açının karşısındaki kenarın uzunluğunun, açının komşu kenara olan uzunluğuna oranını karşılaştırarak "Alpha" açı değerini döndürür.

Atn(açının karşısındaki kenar/çaının komşu kenarı)= Alfa

## Sözdizimi:

    Atn (Number)

## Dönen değer:

İki satır

## Parametreler:

Number: Dik üçgenin iki dik kenarının oranını veren sayısal ifade. Atn fonksiyonu karşılık gelen açıyı radyan cinsinden (arktanjant) döndürür.

Radyanı dereceye dönüştürülmek için, radyanı 180/pi ile çarpın.

degree=(radian*180)/pi

radian=(degree*pi)/180

Burada Pi sabiti 3.14159 yuvarlanmış şekliyle alınır.

## Hata kodları:

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

## Örnek:

    ' Aşağıdaki örnek bir dik açılı üçgen için hesaplama yapar

    ' Alfa açısı Alfa açısının tanjantından:

    Sub ExampleAtn

    ' yuvarlanmış Pi=3.14159 ön tanımlı bir sabittir

    Dim d1 As Double

    Dim d2 As Double

        d1 = InputBox("Komşu taraftaki açının uzunluğunu giriniz: ","Komşu")

        d2 = InputBox("Karşı taraftaki açının uzunluğunu giriniz: ","Karşı")

        Print "Alfa açısı"; (atn (d2/d1) * 180 / Pi); " derecedir"

    End Sub