test22.b 152 B

123456789
  1. 10 open "i", #6, "tst/data1"
  2. 20 input #6, s$
  3. 30 print s$
  4. 40 input #6, s1$
  5. 50 print s1$
  6. 60 print "try to read beyond"
  7. 70 input #6, s$
  8. 80 print s$
  9. 90 end