„Atn“ funkcija

Trigonometrinė funkcija, kuri grąžina skaitinio reiškinio arktangentą. Grąžinimo reikšmė yra intervale nuo -Pi/2 iki + Pi/2.

Arktangentas yra atvirkštinė tangeto funkcijai. Funkcija „Atn“ grąžina radianais išreikštą kampą „Alfa“, naudojant šio kampo tangentą. Funkcija taip pat gali grąžinti kampą „Alfa“ lygindama kraštinės, esančios priešingos kampui, ir kraštinės, kuri yra greta kampo, ilgio santykį stačiajame trikampyje.

Atn (kraštinė priešais kampą/kraštinės greta kampo)=alfa

Sintaksė:


        Atn(skaičius)

Grąžinimo reikšmė:

Dvigubas

Parametrai:

Skaičius bet kuris skaitinis reiškinys, nusakantis stačiojo trikampio dviejų kraštų santykį. Funkcija „Atn“ grąžina atitinkamą kampą radianais (arktangentais).

Norėdami konvertuoti radianus į laipsnius, padauginkite radianus iš 180/pi.

laipsnis=(radianas*180)/pi

radianas=(laipsnis*pi)/180

Pi yra fiksuota apskritimo konstanta, kurios suapvalinta reikšmė lygi 3,14159. Pi yra a„Basic“ matematinė konstanta.

Klaidos kodai:

5 Neteisingas procedūros iškvietimas

Pavyzdys:


        ' Šis pavyzdys skirtas stačiajam trikampiui
        ' kampas„ Alpha“ atsižvelgiant į kampo„ Alpha“ tangentą:
        Sub ExampleAtn
        ' suapvalinta Pi = 3,14159 yra apibrėžta konstanta
        Dim d1 As Double
        Dim d2 As Double
            d1 = InputBox("Įveskite kraštinės, esančios šalia kampo, ilgį: ","Šalia")
            d2 = InputBox("Įveskite kraštinės, esančios priešais kampo, ilgį: ","Priešais")
            Print "„Alfa“ kampas lygus"; (atn (d2/d1) * 180 / Pi); " laipsnių"
        End Sub

Paremkite mus!