RosettaCodeData/Task/Loops-While/Lisaac/loops-while.lisaac

8 lines
78 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
+ i : INTEGER;
i := 1024;
{ i > 0 }.while_do {
i.println;
i := i / 2;
};