nuttx-apps/examples/bastest/tests/test38.bas

10 lines
115 B
QBasic

dim x(10)
mat read x
mat print x
mat redim x(7)
mat print x
mat redim x(12)
mat print x
data 1,2,3,4,5,6,7,8,9,10