> 其他 >
VF程序求三位数中的所有水仙花数(即指一个三位数,其各位数字立方和等于该数本身)
人气:393 ℃ 时间:2019-08-19 07:56:39
解答
*** Daffodil NumberCLOSE ALLCLEAR ALLCLEARFOR nLoop_01 = 100 TO 999IF (VAL(SUBSTR(ALLTRIM(STR(nLoop_01)),1,1)) ^ 3) + ;(VAL(SUBSTR(ALLTRIM(STR(nLoop_01)),2,1)) ^ 3) + ;(VAL(SUBSTR(ALLTRIM(STR(nLoop_01...
推荐
猜你喜欢
© 2024 79432.Com All Rights Reserved.
电脑版|手机版