Imports System
Public Module Module1
Public Sub Main()
Dim num as integer
Console.WriteLine("INGRESE UN NÚMERO")
num = CInt(Console.ReadLine())
for i as integer = 0 to num
Console.WriteLine(i)
next
End Sub
End Module