Como calcular o seno, co-seno, tangente, secante, co-secante e co-tangente de um ângulo informado pelo usuário - Exercícios Resolvidos de VisuAlg

algoritmo "Calcular seno, cosseno e tangente em VisuAlg"

var
  // variáveis usadas na resolução do problema
  angulo_graus, angulo_radianos, seno, co_seno: real
  tangente, co_tangente, secante, co_secante: real

inicio
  // vamos pedir para o usuário informar um ângulo em graus
  escreva("Informe o ângulo em graus: ")
  leia(angulo_graus)
  escreval("O ângulo em graus informado foi: ", angulo_graus)

  // vamos converter o ângulo em graus para ângulo em radianos
  angulo_radianos <- angulo_graus * (Pi / 180.0)
  escreval("O ângulo em radianos é: ", angulo_radianos)

  // vamos calcular o seno do ângulo
  seno <- Sen(angulo_radianos)
  // vamos calcular o cosseno do ângulo
  co_seno <- Cos(angulo_radianos)
  // vamos calcular a tangente do ângulo
  tangente <- Tan(angulo_radianos)
  // vamos calcular a co-tangente do ângulo