10 N% = 1024 20 IF N% = 0 THEN 60 30 PRINT N% 40 N% = N%/2 50 GOTO 20 60 END