(资料图片仅供参考)

1、水仙花数是指一个 n 位数 ( n≥3 )，它的每个位上的数字的 n 次幂之和等于它本身。

2、（例如：1^3 + 5^3+ 3^3 = 153）可以运用将一个 For...Next 循环放置在另一个 For...Next 循环中，组成嵌套循环来解决水仙花求解问题。

3、以3位10进制数100-999为例，代码如下：PrivateSubCommand1_Click()DimiAsLong,jAsLong,kAsLongDimsAsLongFori=1To9Forj=0To9Fork=0To9s=i*100+j*10+kIf((i^3)+(j^3)+(k^3))=sThenDebug.PrintsEndIfNextkNextjNextiEndSub。

本文分享完毕，希望对你有所帮助。