10 I = 1024
20 WHILE I > 0
30   PRINT I
40   i = INT(i/2)
50 WEND
60 END