RosettaCodeData/Task/Loops-While/K/loops-while.k

2 lines
33 B
Plaintext

{while[x>0; \echo x; x%:2]} 1024