6.求100—999中的水仙花数（若三位数ABC=A^3+B^+C^3)则称此数为水仙花数.(友情提示：把ABC通过mo

来源：学生作业帮编辑：作业帮分类：综合作业时间：2024/05/10 11:49:10

6.求100—999中的水仙花数（若三位数ABC=A^3+B^+C^3)则称此数为水仙花数.(友情提示：把ABC通过mod和“\”
6.求100—999中的水仙花数（若三位数ABC=A^3+B^+C^3)则称此数为水仙花数.(友情提示：把ABC通过mod和“\”运算把它的个,十,百位分离出来)
求程序代码!

我用FreeBasic做的
DIM AS INTEGER I,T,S,D
FOR I=100 TO 999
T=I:S=0
DO
D=T MOD 10
S=S+D^3
T=T\10
LOOP UNTIL T=0
IF S=I THEN PRINT I,
NEXT I
SLEEP
END
附答案：
153,370,371,407
其他的水仙花数：
水仙花数四位的水仙花数共有3个：1634,8208,9474；
　　五位的水仙花数共有3个：54748,92727,93084；
　　六位的水仙花数只有1个：548834；
　　七位的水仙花数共有4个：1741725,4210818,9800817,9926315；
　　八位的水仙花数共有3个：24678050,24678051,88593477
　　……
　　……
　　使用高精度计算,可以得到超过INTEGER类型上限的水仙花数：
　　5:93084
　　5:92727
　　5:54748
　　6:548834
　　7:9800817
　　7:4210818
　　7:1741725
　　7:9926315
　　8:24678050
　　8:24678051
　　8:88593477
　　9:146511208
　　9:912985153
　　9:472335975
　　9:534494836
　　10:4679307774
　　11:32164049650
　　11:40028394225
　　11:42678290603
　　11:49388550606
　　11:32164049651
　　11:94204591914
　　11:44708635679
　　11:82693916578
　　14:28116440335967
　　16:4338281769391370
　　16:4338281769391371
　　17:35875699062250035
　　17:21897142587612075
　　19:3289582984443187032
　　19:4929273885928088826
　　19:4498128791164624869
　　20:63105425988599693916
　　21:449177399146038697307
　　21:128468643043731391252
　　23:27907865009977052567814
　　23:35452590104031691935943
　　23:27879694893054074471405
　　23:21887696841122916288858
　　24:174088005938065293023722
　　24:188451485447897896036875
再问：用VB做的程序代码是什么

6.求100—999中的水仙花数（若三位数ABC=A^3+B^+C^3)则称此数为水仙花数.(友情提示：把ABC通过mo vfp程序题1 输入20个数,求出它们的最大值,最小值和平均值.2 求100-999中的水仙花数.三位数abc,若a^3 编程100~999中的水仙花数.水仙花数指一个三位数,它的每位数字立方之和等于该数. 边写一个求水仙花数的函数,求3位正整数的全部水仙花数中的次大值.所谓水仙花数是指三位整数的各位上的数求所有水仙花数及其个数.水仙花数为一个三位数,它的各位数的立方之和等于它本身.如153=1^3+5^3+3^3. 编写一个求水仙花数的函数,求3位正整数的全部水仙花数中的次大值. 输出所有的“水仙花数” 用c语言程序水仙花数例；153=1^3+5^3+3^3 设三位数abc,若a>b,c>b,则称这样的三位数为"凹数",现从0,1,2,3,4,5这六个数中任取三个数字,组成三位以下程序的功能是求100-999之间的水仙花数（水仙花数是指一个三位数的各个位数字的立方和是这个数本身）用C语言打印100以内的水仙花数（例如水仙花数153=1的立方+5的立方+3的立方） (1/2)VB编程,如果一个三位整数等于其各位数字的立方和,则称这个数为水仙花数,如153=1^3+5... 求三位数水仙花数的算法怎么设计?