Imports System

Public Module Module1

    Public Sub Main()

        Dim teacher(2) as string 

        Dim i as integer

        For i = 0 to 2

        teacher(i)= Console.ReadLine()

    Next

        For i = 0 to 2

        Console.WriteLine(teacher(i))

    Next

    End Sub

End Module