Imports System

Public Module Module1

    Public Sub Main()

        For i = 1 to 6000

        Console.Writeline(i*7)

    Next

    End Sub

End Module