lang/basic/test/test21.b

   1 80 open "i",#3,"tst/data"
   2 100 input #3, a
   3 105 print a
   4 110 input #3, b
   5 115 print b
   6 120 input #3, c,d
   7 125 print c,d
   8 130 let x=a+b+c+d
   9 140 print a,b,c,d,x
  10 180 end