RosettaCodeData/Task/Loops-While/Lisaac/loops-while.lisaac
Ingy döt Net db842d013d A-M baby
2013-04-10 21:29:02 -07:00

7 lines
78 B
Text

+ i : INTEGER;
i := 1024;
{ i > 0 }.while_do {
i.println;
i := i / 2;
};