Imports System

Public Module Module1

    Public Sub Main()

        Dim n as integer

        Console.WriteLine("Ingrese un número")

n = CInt(Console.ReadLine())

for i as integer = 0 to n

Console.WriteLine(i)

next

​

​

    End Sub

End Module