主题：神哪救救我吧～～～～～关于输出水仙花数的问题
HUOLILILY
[专家分：0] 发布于 2005-05-12 21:07:00
[em15]
我们要回答一个问题：输出一个三位数，它的各位数字立方和等于它本身，怎样写出ＱＢ的程序？急件，要立刻救救我哇～～～
回复列表 （共23个回复）
沙发
HUOLILILY [专家分：0] 发布于 2005-05-12 21:32:00
各位快回复~~~~
板凳
HUOLILILY [专家分：0] 发布于 2005-05-12 21:50:00
我都做出来了~~~~~~~~~~~~~
3 楼
davidw017 [专家分：4170] 发布于 2005-05-12 22:34:00
cls
for a = 1 to 9
for b = 0 to 9
for c = 0 to 9
if a*a*a+b*b*b+c*c*c = 100*a+10*b+c then
print 100*a+10*b+c
end if
next c, b, a
end
'这个程序我至少写了 M+1 次了…
4 楼
moz [专家分：37620] 发布于 2005-05-13 10:00:00
可不可以有办法让c 在0，1，4，5，6，9，中循环
for c=0 to 9
if c=2 or c=7 then c=c+2
...
next
5 楼
amwkfbb [专家分：50] 发布于 2005-05-13 12:54:00
for i = 100 to 999
a=i\100
b=(i-a*1000)\10
c=i mdo 10
if i =a*a*a+b*b*b+c*c*c then print i ;
next i
end
(水仙花数当然是三位数了把一个数拆成个十百位就可以了）
6 楼
萧山·湘凌子 [专家分：10] 发布于 2005-05-13 17:44:00
搂主是双语学校的吧？而且是初二微机特长。我也在这个特长组。我只想说一句：三楼的的程序狠对，但a*a*a等写成a^3不是更方便些吗？
7 楼
萧山·湘凌子 [专家分：10] 发布于 2005-05-13 17:57:00
交个朋友吧，楼主！
qq:395838063
8 楼
davidw017 [专家分：4170] 发布于 2005-05-13 18:53:00
to 萧山·湘凌子, 那个有什么重要的区别么，特别是在众多语言中，都支持 *，而不一定支持 ^，所以……
9 楼
qbqb [专家分：400] 发布于 2005-05-13 19:27:00
for i=100 to 999
if (i mod 10)^3+(i\10 mod 10)^3 +(i\100)^3=i then print i
next
10 楼
amwkfbb [专家分：50] 发布于 2005-05-14 09:19:00
我一直这样子教学生的?难道我的程序有问题?难道我在误人子弟吗?为什么不给我分数呢?我的程序也是百分百正确的```[em10][em10][em10]
我来回复
您所在位置：