OPEN "INPUT.TXT" FOR INPUT AS #1
 DO WHILE NOT (EOF(1))
 INPUT #1, N
 LOOP
OPEN "OUTPUT.TXT" FOR OUTPUT AS #2


CLOSE