Imports System

Public Module Module1

    Public Sub Main()

        dim suma, numero as integer

        dim total as integer

        dim contador as integer

        suma = 0 

        console.writeline("cuantos numeros desea ingresar?")

        total = console.readline

        for contador = 1 to total step 1 

        console.writeline("Ingrese numero: ")

        numero = console.ReadLine()

        suma = numero 

    next

    dim promedio as double

    promedio = suma / total

    console.writeline("El promedio es : " &promedio)

    End Sub

End Module