Imports System

Public Module Module1

    Public Sub Main()

        Dim n as integer

        for n = 1 to (100)

        Console.ReadLine()

        n

    Next 

    End Sub

End Module