nRadianÂngulo em radianos.
AdvPL GuiaTan(nRadian) -> nValueCalcula uma razão trigonométrica a partir de radianos.
Recebe radianos; converta graus antes de chamar. Tangente não é definida nos múltiplos ímpares de pi/2 e se torna numericamente instável perto desses pontos. O exemplo escolhe 45 graus, longe da singularidade; não copia um teste em pi/2. (Fontes: refs. 1–1.)
Tan(nRadian) -> nValuenRadianÂngulo em radianos.
Numérico.
#Include "Protheus.ch"
User Function Ed687()
Local nRadianos := 45 * 3.141592653589793 / 180
// Converter a unidade antes de chamar a funcao.
ConOut(Tan(nRadianos))
Return NilValor aproximadamente 1, sujeito à representação numérica. Em revisão: exemplo editorial não compilado nem executado em Protheus. Conferir includes, release, RDD e contexto antes de homologar.
© 2026 Usina.BR. Todos os direitos reservados. TOTVS, Protheus, Microsiga e seus respectivos logotipos são marcas de seus titulares. O AdvPL Guia é independente e utiliza citações limitadas, atribuídas e justificadas por finalidade educativa. Consulte os Termos de Uso. Termos de Uso
Comentários
Ainda não há comentários aprovados.
Entre com Google ou Microsoft para comentar.