Anonymous user
Loops/Do-while: Difference between revisions
→{{header|Minimal BASIC}}: Added
m (Added Dyalect) |
(→{{header|Minimal BASIC}}: Added) |
||
Line 590:
130 PRINT I
140 LOOP UNTIL MOD(I,6)=0</lang>
==={{header|Minimal BASIC}}===
Minimal BASIC does not have a <code>do .. while</code> construct. Equivalent using conditional jump:
<lang gwbasic>
10 REM Loops/Do-while
20 LET I=0
30 LET I=I+1
40 PRINT I
50 IF INT(I/6)*6 <> I THEN 30
60 END
</lang>
==={{header|Sinclair ZX81 BASIC}}===
|