Loops/While: Difference between revisions
Content added Content deleted
m (Unicon/Icon consistency) |
m (Unicon/Icon consistency 2) |
||
| Line 216: | Line 216: | ||
modifyIORef r (`div` 2))</lang> |
modifyIORef r (`div` 2))</lang> |
||
== |
== Icon and Unicon == |
||
==={{header|Icon}}=== |
|||
<lang icon>procedure main() |
<lang icon>procedure main() |
||
local i |
local i |
||
| Line 222: | Line 223: | ||
while write(0 < (i := i / 2)) |
while write(0 < (i := i / 2)) |
||
end</lang> |
end</lang> |
||
==={{header|Unicon}}=== |
|||
This Icon solution works in Unicon. |
|||
=={{header|J}}== |
=={{header|J}}== |
||