Loops/While: Difference between revisions

added Applesoft BASIC implementation
(Added implementation for dc)
(added Applesoft BASIC implementation)
Line 69:
set i to i / 2
end repeat</lang>
 
=={{header|Applesoft BASIC}}==
<lang Applesoft BASIC>
10 I% = 1024
20 IF I% > 0 THEN PRINT I%:I% = I% / 2: GOTO 20
</lang>
 
=={{header|AutoHotkey}}==
413

edits