15 lines
203 B
QBasic
15 lines
203 B
QBasic
100 read a
|
|
110 print a
|
|
120 restore
|
|
130 read b
|
|
140 print b
|
|
142 restore
|
|
143 restore 170
|
|
144 read b,c
|
|
145 print b,c
|
|
146 print "try to read beyond eof"
|
|
147 read d
|
|
148 print d
|
|
150 data 6
|
|
170 data 8,9
|
|
180 end
|