Revision as of 02:08, 18 August 2008 (view source) rosettacode>Spoon! (added haskell attempt; not really loop) ← Older edit		Revision as of 00:19, 23 August 2008 (view source) rosettacode>Mwn3d m (Moved to Iteration cat) Newer edit →
Line 1: {{task\|Iteration}}~~[[Category:Iteration]]~~Start an integer value at 1024. Loop while it is greater than 0. Print the value (with a newline) and divide it by two each time through the loop. =={{header\|Ada}}==

Loops/While (view source)