Como calcular o comprimento da hipotenusa em VB.NET dadas as medidas do cateto oposto e do cateto adjascente

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

Imports System

' Algoritmo VB.NET para calcular o comprimento da hipotenusa
' dadas as medidas do cateto oposto e do cateto adjascente
Module Program
  ' função principal do programa VB.NET
  Sub Main(args As String())
    Dim a As Double = 20 ' medida do cateto oposto
    Dim b As Double = 30 ' medida do cateto adjascente

    ' agora vamos calcular o comprimento da hipotenusa
    Dim c As Double = Math.Sqrt(Math.Pow(a, 2) + Math.Pow(b, 2))

    ' e mostramos o resultado
    Console.WriteLine("O comprimento da hipotenusa é: " & c)

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