Anonymous user
Loops/While: Difference between revisions
Add Seed7 example
Underscore (talk | contribs) m (→{{header|Prolog}}: Reinserted lang tags, since the bug's been fixed.) |
(Add Seed7 example) |
||
Line 511:
(display n)
(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}}==
| |||