ack/lang/basic/test/test23.bas

12 lines
186 B
QBasic

100 print "testing input from terminal"
130 input "integer"; a
140 print a
220 input "float:", a
240 print a
330 input b$
340 print b$
350 input ; "c and d "; c,d
360 print c,d
400 end