Promedio de 5 números VB Aplicación de Consola

En este post desarrollaremos un aplicación de consola en el lenguaje de Vb ; haremos uso de un while el cual cumplirá la función de repetir el ingreso de datos (en este caso 5 veces) para luego estas sean operadas

Procedimiento

1. Creamos un proyecto elegimos Aplicacion de Consola.

2. Luego añadimos el codigo dentro de la sentencia Sub Main().

Module Module1

    Sub Main()

        Dim i As Integer = 0
        Dim num As Single, acu As Single = 0

        While i < 5
            Console.Write("Ingrese {0}º número:", i + 1)
            num = Single.Parse(Console.ReadLine())
            acu += num
            i += 1
        End While
        Console.Write("El promedio de 5 números es {0}", acu / 5)
        Console.Read()
    End Sub

End Module