e0dcfa0c55
* Remove multiple newlines at the end of file * Remove the white space from the end of line
13 lines
174 B
QBasic
13 lines
174 B
QBasic
print "loop started"
|
|
x$=""
|
|
do while len(x$)<3
|
|
print "x$ is ";x$
|
|
x$=x$+"a"
|
|
y$=""
|
|
do while len(y$)<2
|
|
print "y$ is ";y$
|
|
y$=y$+"b"
|
|
loop
|
|
loop
|
|
print "loop ended"
|