RosettaCodeData/Task/Loops-While/Aime/loops-while.aime

integer i;

i = 1024;
while (i) {
    o_plan(i, "\n");
    i /= 2;
}