Imports System
Public Class Count_To
Public Shared Sub Main()
Dim n As Integer, line as Integer
line = Console.Readline()
n = 0
Do While n <> line
n = n + 1
System.Console.WriteLine(n)
Loop
End Sub
End Class
SW1wb3J0cyBTeXN0ZW0KClB1YmxpYyBDbGFzcyBDb3VudF9UbwoJUHVibGljIFNoYXJlZCBTdWIgTWFpbigpIAoJCURpbSBuIEFzIEludGVnZXIsIGxpbmUgYXMgSW50ZWdlcgoJCWxpbmUgPSBDb25zb2xlLlJlYWRsaW5lKCkKCQluID0gMAoJCURvIFdoaWxlIG4gPD4gbGluZQoJCQluID0gbiArIDEKCQkJU3lzdGVtLkNvbnNvbGUuV3JpdGVMaW5lKG4pCgkJTG9vcAoJRW5kIFN1YgpFbmQgQ2xhc3M=