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

10 lines
101 B
QBasic

print "loop started"
i=1
do
print "i is";i
i=i+1
if i>10 then exit do
loop
print "loop ended"