Imports System
Public Class Test
Public Shared Sub Main()
dim a as integer
For a = 1 To 6 step 1
Console.WriteLine(a)
Next a
Console.ReadLine()
End Sub
End Class
SW1wb3J0cyBTeXN0ZW0KClB1YmxpYyBDbGFzcyBUZXN0CglQdWJsaWMgU2hhcmVkIFN1YiBNYWluKCkKCQlkaW0gYSBhcyBpbnRlZ2VyCiAKICAgICAgICBGb3IgYSA9IDEgVG8gNiAgICAgIHN0ZXAgMSAgICAgIAogICAgICAgICAgICAgICAgQ29uc29sZS5Xcml0ZUxpbmUoYSkKICAgICAgICAgICAgIE5leHQgYQogICAgICAgIENvbnNvbGUuUmVhZExpbmUoKQoJRW5kIFN1YgpFbmQgQ2xhc3M=