WHILELOOP set x = 1024 while (x > 0) { write x,! set x = (x \ 2) ; using non-integer division will never get to 0 } quit