RosettaCodeData/Task/Loops-While/TUSCRIPT/loops-while.tu

8 lines
75 B
Turing

$$ MODE TUSCRIPT
i=1024
LOOP
PRINT i
i=i/2
IF (i==0) EXIT
ENDLOOP