Imports System

Public Module Module1

    Public Sub Main()

        DIM COUNT AS INTEGER

        dim Name (49)AS STRING

        FOR COUNT = 0 TO 49

            CONSOLE.WRITELINE("ENTER STUDENT NAME")

        Name(COUNT) = CONSOLE.READLINE()

    NEXT

    FOR COUNT = 0 TO 49

    CONSOLE.WRITELINE(NAME(COUNT))

NEXT

    End Sub

End Module