RosettaCodeData/Task/Loops-Do-while/Axe/loops-do-while.axe

6 lines
46 B
Plaintext

0→A
While 1
A++
Disp A▶Dec,i
End!If A^6