Loops/While: Difference between revisions

(+D)
Line 63:
make "n 1024
while [:n > 0] [print :n make "n :n / 2]
 
=={{header|MAXScript}}==
<pre>
a = 1024
while a > 0 do
(
print a
a /= 2
)
</pre>
 
=={{header|OCaml}}==
Anonymous user