ack/lang/basic/test/test20.bas

10 lines
126 B
QBasic
Raw Permalink Normal View History

1985-01-24 11:27:36 +00:00
100 read a
110 read b
120 read c,d, e
130 let x=a+b+c+d
140 print a,b,c,d,e,x
150 data 6
160 data 7,3
170 data 142, 0
180 end