Imports System
Public Module Module1
Public Sub Main()
Dim i as long
Dim n as long
n= 3
For i = 1 to 100
console.writeline(i*3)
next
End Sub
End Module