ack/lang/basic/test/test20.bas

10 lines
126 B
QBasic

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