RosettaCodeData/Task/Loops-While/Phix/loops-while.phix

6 lines
82 B
Plaintext

integer i = 1024
while i!=0 do
?i
i = floor(i/2) -- (see note)
end while