IBM Lotus Symphony


Função Atn [Tempo de Execução]

A função trigonométrica que retorna o arco tangente de uma expressão numérica. O valor de retorno está no intervalo -Pi/2 a +Pi/2.

O arco tangente é o inverso da função de tangente. A Função Atn retorna o ângulo "Alpha", expresso em radianos, usando a tangente desse ângulo. A função também pode retornar o ângulo "Alpha", comparando a proporção do comprimento do lado oposto ao ângulo com o comprimento do lado adjacente ao ângulo em um triângulo reto.

Atn(lado oposto ao ângulo/lado adjacente ao ângulo)= Alpha

Sintaxe:

Atn (Number)

Valores de Retorno:

Double

Parâmetros:

Number: Qualquer expressão numérica que represente a proporção de dois lados de um triângulo reto. A função Atn retorna o ângulo correspondente em radianos (arco tangente).

Para converter radianos em graus, multiplique os radianos por 180/pi.

grau=(radiano*180)/pi

radiano=(grau*pi)/180

Pi aqui é a constante do círculo fixo com o valor arredondado de 3,14159.

Códigos de Erro

5 Chamada de procedimento inválida

Exemplo:

REM O exemplo a seguir calcula o triângulo reto

REM o ângulo Alpha da tangente do ângulo Alpha:

Sub ExampleATN

REM Pi arredondado = 3,14159 é uma constante predefinida

Dim d1 As Double

Dim d2 As Double

d1 = InputBox$ ("Enter the length of the side adjacent to the angle: ","Adjacent")

d2 = InputBox$ ("Enter the length of the side opposite the angle: ","Opposite")

Print "The Alpha angle is"; (atn (d2/d1) * 180 / Pi); " degrees"

End Sub


Feedback do Produto | Documentação Adicional | Marcas Registradas