Como calcular a área de um losango em VB.NET - Desafio de Programação Resolvido em VB.NET

Informe a medida da diagonal maior: 5
Informe a medida da diagonal menor: 10
A área (em metros quadrados) do losango é: 25

----------------------------------------------------------------------
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 ler os valores das diagonais maior e menor
    Console.Write("Informe a medida da diagonal maior: ")
    Dim diagonal_maior As Integer = Int32.Parse(Console.ReadLine())
    Console.Write("Informe a medida da diagonal menor: ")
    Dim diagonal_menor As Integer = Int32.Parse(Console.ReadLine())

    ' calcula a area do losango
    Dim area As Double = (diagonal_maior * diagonal_menor) / 2
    ' mostra o resultado
    Console.WriteLine("A área (em metros quadrados) é: {0}",
      area)

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

End Module