Imports System

Public Module Module1

    Public Sub Main()

        Dim n as integer

        for n = 2 to 101

        Console.WriteLine(n)

    next 

    End Sub

End Module