10 I=1024
20 IF I=0 THEN END
30 PRINT I
40 I=I/2
50 GOTO 20