100 LET I = 1024
110 DO WHILE I > 0
120    PRINT I
130    LET I = INT(I / 2)
140 LOOP
150 END