Loops/While: Difference between revisions

Content added Content deleted
m (→‎{{header|Prolog}}: Reinserted lang tags, since the bug's been fixed.)
(Add Seed7 example)
Line 511: Line 511:
(display n)
(display n)
(newline))</lang>
(newline))</lang>

=={{header|Seed7}}==
<lang seed7>$ include "seed7_05.s7i";

const proc: main is func
local
var integer: i is 1024;
begin
while i > 0 do
writeln(i);
i := i div 2
end while;
end func;</lang>


=={{header|Slate}}==
=={{header|Slate}}==