Loops/Do-while: Difference between revisions
Content deleted Content added
m Added Dyalect |
→{{header|Minimal BASIC}}: Added |
||
Line 590: | Line 590: | ||
130 PRINT I |
130 PRINT I |
||
140 LOOP UNTIL MOD(I,6)=0</lang> |
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}}=== |
==={{header|Sinclair ZX81 BASIC}}=== |