求100～999中的水仙花数，所谓水仙花数是一个三位数，它的各位数字的立方和等于该数，例如153是一个水仙花数，因为153=13+53+33．试编一段程序，找出所有的水仙花数．

Question

求100～999中的水仙花数，所谓水仙花数是一个三位数，它的各位数字的立方和等于该数，例如153是一个水仙花数，因为153=1³+5³+3³．试编一段程序，找出所有的水仙花数．

Answer 1

I=100
DO
A=I\\100
B=（I-100*A）\\10
C=I-A*100-B*10
IF   I=A*A*A+B*B*B+C*C*C   THEN
PRINT  I
END IF
I=I+1
LOOP UNTIL I＞999
END