80 open "i",#3,"tst/data"
100 input #3, a
105 print a
110 input #3, b
115 print b
120 input #3, c,d
125 print c,d
130 let x=a+b+c+d
140 print a,b,c,d,x
180 end