Imports System

Public Module Module1

    Public Sub Main()

            '1 Definir e iniciar las variables.

        Dim nota as Decimal = 0 

        Dim promedio as Decimal = 0 

        Dim sumaNotas as Decimal = 0

        For i = 1 To 5

        Console.WriteLine ("Ingrese la nota Nro. " + i.ToString())

        nota = Console.ReadLine()

        sumaNotas = sumaNotas + nota

    Next

    promedio = sumaNotas / 5

    '2 Mostrar el resultado en pantalla.

    Console.WriteLine("El promedio es " + promedio.ToString())

    End Sub

End Module