用循环语句求所有的水仙花数(for--next)

水仙花数:指一个三位数,其各位数的立方和等于该数,如153=13+53+3

第1个回答  2011-12-22
看来我来的不晚
VB实现的,你用着看吧,源码如下
Sub Main()
Dim a As Integer, b As Integer, c As Integer, i As Integer

For i = 100 To 999
a = i Mod 10
b = (i - a) / 10 Mod 10
c = (i - b * 10) / 100

If a * a * a + b * b * b + c * c * c = i Then
Console.WriteLine(i)
End If
Next
End Sub本回答被提问者采纳
第2个回答  2011-12-22
#include<stdio.h>
void main()
{
int b,c,d;
for(int i=100;i<1000;i++)
{
b=i/100;
c=(i-b*100)/10;
d=i-b*100-c*10;
if(b*b*b+c*c*c+d*d*d==i)
printf("%d\n",i);
}}追问

用VB编,求解!

第3个回答  2011-12-22
楼上正解。

用循环语句求所有的水仙花数(for--next)
Next End Sub

c语言输出所有水仙花数
3、其中:a表示的是水仙花数的百位数,b表示的是水仙花数的十位数,c表示的是水仙花数的个位数,sum表示的是所有累加下来的水仙花数。4、if(sum==a*a*a+b*b*b+c*c*c)这一个程序步骤的作用是在规定查找的范围内找到符合这个条件的数。5、注意a,b,c,sum的运算过程都是要在for 循环内完成,...

分别使用while、do-while和for语句编程,找出所有的水仙花数并输出。
public class numl { public static void main(String[] args) { int x, y, z, i, sum;for(i=100;i<1000;i++)z=i%100%10;y=i\/10;y=y%10;x=i\/ 100;sum=x*x*x+y*y*y+z*Z*z;if (sum=i)System. out. println (sum+"是水仙花数”) ;} } Whi le语句 public class ...

Java用while语句来找出所有的水仙花数
public static void main(String[] args){ int x=100;int a,b,c;while(x<1000){ a=x%10;b=(x%100-a)\/10;c=(x-x%100)\/100;if(a*a*a+b*b*b+c*c*c==x)System.out.println(x); x++;} } }

编程求出所有的 “水仙花数”:
include <iostream.h> void main(){ for(int i=1; i<=9; i++)for(int j=0; j<=9; j++)for(int k=0; k<=9; k++)if(i*i*i+j*j*j+k*k*k == 100*i+10*j+k)cout <<(100*i+10*j+k) <<"是水仙花数.\\n";} ...

...主要是for循环哪里。关于VB,求水仙花数的。
解释:水仙花数是指一个 n 位数 ( n≥3 ),它的每个位上的数字的 n 次幂之和等于它本身。(例如:1^3 + 5^3 + 3^3 = 153)--- \/\/ 比如你输入3 For b = 10 ^ (a - 1) To (10 ^ a - 1)10 ^ ( a - 1) 表示10 的 2次方 = 100 最小的3位数 10 ^ a - 1表示...

求所有水仙花的个数
?是水仙花数吗 在1000以内的水仙花数共有4个,分别为:153、370、371、407 四位的水仙花数1634,8208,9474

急急急!求100到999之间所有的水仙花数
10; p++; if(p == res+3){ \/\/指向末尾+1,存入数组结束 p = res; for(int i=0;i<3;i++){ r += pow(*p,3); p++; } return r; } return 0;} 如有帮助,请点赞支持原创QVQ

水仙花数是什么东东,怎么求?
next i ```3. 执行上述程序,得到的结果是所有100至999之间的水仙花数:153, 370, 371, 407。关于玫瑰花数的扩展资料,有类似的数被称为玫瑰花数。一个程序示例(可能存在语法错误)如下:```c include include int main(void) { int i;int s;int a, b, c, d;for (i = 1000; i < ...

用VB编写:找出所有的“水仙花数”。“水仙花数”是指一个三位数,其各位...
Next Console.ReadLine()End Sub End Module ```此代码段定义了一个模块`Module1`,并在其中包含了一个`Main`子程序。`Main`子程序首先打印出标题"三位数的'水仙花数'有:",然后通过一个`For`循环遍历所有的三位数(100至999)。对于每个数字,它计算出各位数字的立方和,并检查这个和是否等于原来...

相似回答