Loops/While: Difference between revisions

No edit summary
Line 915:
x_ = x_ % 2 -- integer division
end</lang>
 
=={{header|NewLISP}}==
<lang NewLISP>(let (i 1024)
(while (> i 0)
(println i)
(setq i (/ i 2))))</lang>
 
=={{header|Nimrod}}==