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

1 line
40 B
Text

1024 :n (n 0 >) (n puts 2 div @n) while