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

Informe o ângulo em graus: 35
O ângulo em graus informado foi: 35.0
O ângulo em radianos é: 0.6108652381980153
O seno do ângulo é: 0.573576436351046
O cosseno do ângulo é: 0.8191520442889918
A tangente do ângulo é: 0.7002075382097097
A co-tangente do ângulo é: 1.4281480067421146
A secante do ângulo é: 1.220774588761456
A co-secante do ângulo é: 1.7434467956210982

----------------------------------------------------------------------
Se precisar de ajuda com o código abaixo, pode me chamar
no WhatsApp +55 (62) 98553-6711 (Osmar)
----------------------------------------------------------------------

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)
    ' vamos calcular a co-secante do ângulo
    Dim co_secante As Double = (1.0 / seno)

    ' e mostramos os resultados
    Console.WriteLine("O seno do ângulo é: " & seno)
    Console.WriteLine("O cosseno do ângulo é: " & co_seno)
    Console.WriteLine("A tangente do ângulo é: " & tangente)
    Console.WriteLine("A co-tangente do ângulo é: " & co_tangente)
    Console.WriteLine("A secante do ângulo é: " & secante)
    Console.WriteLine("A co-secante do ângulo é: " & co_secante)

    Console.WriteLine(vbCrLf & "Pressione qualquer tecla para sair...")
    ' pausa o programa
    Console.ReadKey()
  End Sub

End Module