Loops/Do-while: Difference between revisions

Line 595:
 
 
==={{header|COMMODORECommodore BASIC}}===
<lang basic>50 rem does not have do-while simultate using for-next
100 x=0
120 for b=-1 to 0 step 0
130 x=x+1
140 b=print x/6<>int(x/6)
150 print b=x/6<>int(x/6)
160 next x
</lang>
 
 
 
 
==={{header|IS-BASIC}}===
Anonymous user