Como calcular a área de um Triângulo Equilátero em VB.NET - VB.NET para Geometria, Trigonometria e Álgebra Linear

Imports System

Module Program
  ' função principal do programa VB.NET
  Sub Main(args As String())
    ' vamos pedir para o usuário informar o valor do lado do triângulo
    Console.Write("Informe o lado do triângulo: ")
    Dim lado As Double = Double.Parse(Console.ReadLine())

    ' agora vamos calcular a área do triângulo equilátero
    Dim area As Double = (1.0 / 4.0) * Math.Sqrt(3) * Math.Pow(lado, 2)

    ' e finalmente mostramos o resultado
    Console.WriteLine("A área do triângulo equilátero é: " & area)

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

End Module