RosettaCodeData/Task/Loops-While/Mathematica/loops-while.math

6 lines
53 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
i = 1024;
While[i > 0,
Print[i];
i = Floor[i/2];
]