Module Module1

    Sub Main()
        FileOpen(1, "DATA5.txt", OpenMode.Input)
        FileOpen(2, "OUT5.txt", OpenMode.Output)
        PrintLine(2, "1")
        PrintLine(2, "3")
        PrintLine(2, "5")
        PrintLine(2, "2")
        PrintLine(2, "6")
    End Sub

End Module