This simple little program seems to do the trick.

- Code: Select all
`100 PRINT "DECOMP OF A NUMBER TO POWERS OF 2"`

110 INPUT "ENTER A NUMBER: ",A

130 LET B=1

140 IF B>A THEN 170

150 LET B=B*2

160 GOTO 140

170 LET B=B/2

180 PRINT B

190 LET A= A - B : LET B=1

200 IF A=0 THEN END

210 GOTO 150

- Derrik