Imports System

Public Module Module1

    Public Sub Main()

        DIM x, Contador AS INTEGER

        DIM Suma, Numero AS INTEGER

        Suma = 0

        Console.WriteLine("Cuantos numeros deea sumar: ")

        x = Console.ReadLine()

        For Contador = 1 to x step 1

        Console.WriteLine("Ingrese numero: ")

        Numero = Console.ReadLine()

        Suma = Suma + Numero

    Next

    Console.WriteLine("La suma es: " &Suma)

    End Sub

End Module