Imports System

Public Module Module1

    Public Sub Main()

        'declaracion de variables

        dim num1 as integer

        dim num2 as integer

        dim num3 as integer

        dim num4 as integer

        dim num5 as integer

        dim sumar as integer

        'captura de numero 1

        console.WriteLine("ingrese el valor del numero 1: ")

        num1=console.ReadLine()

        'captura de numero 2

        console.WriteLine("ingrese el valor del numero 2: ")

        num2=console.ReadLine()

            'captura de numero 3

        console.WriteLine("ingrese el valor del numero 3: ")

        num3=console.ReadLine()

        'captura de numero 4

        console.WriteLine("ingrese el valor del numero 4: ")

        num4=console.ReadLine()

            'captura de numero 5

        console.WriteLine("ingrese el valor del numero 5: ")

        num5=console.ReadLine()

        sumar=num1+num2+num3+num4+num5

        console.WriteLine("el resultado es: " &sumar)

        dim i as integer

        dim n as integer

        dim valor as integer

        dim acumulador as integer=0

        console.WriteLine("ingrese la cantidad de numeros a digitar")

        n=console.ReadLine()

        for i=1 to n step 1

        console.WriteLine(i)

        console.WriteLine("escriba un numero")

        valor=console.ReadLine()

        acumulador=acumulador+valor

    next

    console.WriteLine("el resultado de la sumatoria es" &acumulador)

    End Sub

End Module

​