Imports System

Public Module Module1

    Public Sub Main()

        Console.WriteLine("Hello World")

        Dim List(9) as string

        For i as integer = 0 to 9

        List(i) = console.ReadLine()

        List(0) = "Zero"

        List(1) = "One"

        List(2) = "Two"

        List(3) = "Three"

        List(4) = "Four"

        List(5) = "Five"

        List(6) = "Six"

        List(7) = "Seven"

        List(8) = "Eight"

        List(9) = "Nine"

    Next

    End Sub

End Module