RosettaCodeData/Task/Loops-While/Agena/loops-while.agena

8 lines
98 B
Plaintext

scope
local i := 1024;
while i > 0 do
print( i );
i := i \ 2
od
epocs