Loops/While: Difference between revisions

Content added Content deleted
mNo edit summary
Line 1,952: Line 1,952:
jn 0
jn 0
pop exit</lang>
pop exit</lang>

=={{header|XLISP}}==
<lang xlisp>(DEFINE I 1024)

(WHILE (>= I 1)
(PRINT I)
(DEFINE I (/ I 2)))</lang>


=={{header|XPL0}}==
=={{header|XPL0}}==