RosettaCodeData/Task/Loops-While/Ursa/loops-while.ursa
2023-07-01 13:44:08 -04:00

7 lines
94 B
Text

decl int n
set n 1024
while (> n 0)
out n endl console
set n (int (/ n 2))
end while