Loops/While: Difference between revisions
Content added Content deleted
(add UNIX Shell) |
(MOO) |
||
Line 335: | Line 335: | ||
END; |
END; |
||
END DivBy2;</lang> |
END DivBy2;</lang> |
||
=={{header|MOO}}== |
|||
<lang moo> |
|||
i = 1024; |
|||
while (i > 0) |
|||
player:tell(i); |
|||
i /= 2; |
|||
endwhile</lang> |
|||
=={{header|Oberon-2}}== |
=={{header|Oberon-2}}== |