Z2A練習：讀檔架構

各題之讀檔架構省略，只提供一次如下

 FileOpen(1, "in1.txt", OpenMode.Input)

 FileOpen(2, "in2.txt", OpenMode.Input)

 FileOpen(3, "out.txt", OpenMode.Output)

 For fn = 1 To 2

     If fn = 2 Then PrintLine(3)

     Dim n As Integer = LineInput(fn)

     For i = 1 To n

       Dim line As String = LineInput(fn)

       PrintLine(3, MyPxx(line))  '呼叫 MyPxx 傳入一列字串，傳回規定解答

     Next

 Next

 End