RosettaCodeData/Task/Loops-While/M2000-Interpreter/loops-while-2.m2000
2023-07-01 13:44:08 -04:00

1 line
61 B
Text

Module Online { A=1024&: While A>0 {Print A: A/=2}} : OnLine