ABAP算法题：水仙花数

题目：打印出所有的"水仙花数"，所谓"水仙花数"是指一个三位数，其各位数字立方和等于该数本身。例如：153是一个"水仙花数"，因为153=1的三次方＋5的三次方＋3的三次方。

DATA i TYPE i VALUE 99.
DATA str TYPE string.

DO 900 TIMES.
  i = i + 1.
  str = i.
  IF  i = str+(1) ** 3 + str+1(1) ** 3 + str+2(1) ** 3.
    WRITE i.
  ENDIF.
ENDDO.

 

转载于:https://www.cnblogs.com/yibing-jia/p/11278113.html