mirror
/
RosettaCodeData
mirror of https://github.com/acmeism/RosettaCodeData.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity
RosettaCodeData/Task/Loops-While/AmigaE/loops-while.amiga

8 lines
97 B
Plaintext
Raw Permalink Blame History

PROC main()
DEF i = 1024
WHILE i > 0
WriteF('\d\n', i)
i := i / 2
ENDWHILE
ENDPROC
Reference in New Issue View Git Blame Copy Permalink