Escreva um programa em VB.NET para ler, calcular e escrever a média aritmética entre dois números - Exercícios Resolvidos de VB.NET

Informe um número: 9
Informe outro número: 2
A média entre os dois números é: 5.5

Imports System

Module Program
  ' função principal do programa VB.NET
  Sub Main(args As String())
    ' variáveis usadas na resolução do problema
    Dim n1, n2, media As Double

    ' vamos ler o primeiro número
    Console.Write("Informe um número: ")
    n1 = Double.Parse(Console.ReadLine())

    ' vamos ler o segundo número
    Console.Write("Informe outro número: ")
    n2 = Double.Parse(Console.ReadLine())

    ' agora vamos calcular a média aritmética
    media = (n1 + n2) / 2

    ' e mostramos o resultado
    Console.WriteLine("A média entre os dois números é: " & media)

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

End Module