11 lines
160 B
QBasic
11 lines
160 B
QBasic
|
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
|