Loops/While: Difference between revisions

Content added Content deleted
(+D)
Line 63: Line 63:
make "n 1024
make "n 1024
while [:n > 0] [print :n make "n :n / 2]
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}}==
=={{header|OCaml}}==