RosettaCodeData/Task/Loops-Do-while/ASIC/loops-do-while-1.asic

15 lines
166 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
REM Loops/Do-while
I = 0
REM first iteration - before the While
I = I + 1
PRINT I
IMod6 = I MOD 6
WHILE IMod6 <> 0
I = I + 1
PRINT I
IMod6 = I MOD 6
WEND
END