问题
解答题
求100~999中的水仙花数,所谓水仙花数是一个三位数,它的各位数字的立方和等于该数,例如153是一个水仙花数,因为153=13+53+33.试编一段程序,找出所有的水仙花数.
答案
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