9 lines
123 B
Text
9 lines
123 B
Text
|
open 1, "input.txt"
|
||
|
|
open 2, "output.txt"
|
||
|
|
while not eof(1)
|
||
|
|
linea$ = readline(1)
|
||
|
|
write 2, linea$
|
||
|
|
end while
|
||
|
|
close 1
|
||
|
|
close 2
|