8 lines
156 B
Text
8 lines
156 B
Text
open "input.txt" for reading as #1
|
|
open "output.txt" for writing as #2
|
|
while not eof(1)
|
|
line input #1 linea$
|
|
print #2 linea$
|
|
wend
|
|
close #1
|
|
close #2
|