Como calcular o seno, co-seno, tangente, secante, co-secante e co-tangente de um ângulo informado pelo usuário - Desafio de Programação Resolvido em VB.NET

Imports System

Module Program
  ' função principal do programa VB.NET
  Sub Main(args As String())
    ' vamos pedir para o usuário informar um ângulo em graus
    Console.Write("Informe o ângulo em graus: ")
    Dim angulo_graus As Double = Double.Parse(Console.ReadLine())
    Console.WriteLine("O ângulo em graus informado foi: " &
      angulo_graus)

    ' vamos converter o ângulo em graus para ângulo em radianos
    Dim angulo_radianos As Double = angulo_graus * (Math.PI / 180.0)
    Console.WriteLine("O ângulo em radianos é: " & angulo_radianos)

    ' vamos calcular o seno do ângulo
    Dim seno As Double = Math.Sin(angulo_radianos)
    ' vamos calcular o cosseno do ângulo
    Dim co_seno As Double = Math.Cos(angulo_radianos)
    ' vamos calcular a tangente do ângulo
    Dim tangente As Double = Math.Tan(angulo_radianos)
    ' vamos calcular a co-tangente do ângulo
    Dim co_tangente As Double = (1.0 / tangente)
    ' vamos calcular a secante do ângulo
    Dim secante As Double = (1.0 / co_seno)