level 1
i=100doa=i\100b=(i-100*a)\10c=i-a*100-b*10if i=a^3+b^3+c^3 thenprint iend ifi=i+1loop until i>999end题的要求是:求100-999中的水仙花数 所谓的水仙花数就是一个三为数 它的各位数字的立方和等于该数 例如153是个水仙花数 因为153=1^3+5^3+3^3 试编一段程序找出100-999中的所有水仙花数
2008年09月07日 13点09分
1
level 0
在QB中,几的立方应用?*?*?在这题中,应该就是A*A*A+B*B*B+C*C*C我就是这么写的,不知道对不你试试
2008年09月20日 10点09分
3
level 0
a^3这样很慢 建议指数如果确定,还是写成a*a*a快
指数如果不确定 a^3 也可以
个人方法:for i=2 to n
a=a*a
next i
各位不要见怪^_^
2009年01月19日 04点01分
4
level 0
LZ,你这儿错了
a=i\100
b=(i-100*a)\10
c=i-a*100-b*10
a,b,c分别定义个,十,百位值,应该:
a=abs(i/100)
b=abs((i-100*a)/10)
c=i-a*100-b*10
,因为你的a,b小数点后还有值
2009年01月20日 08点01分
5