水仙花数(如 153=13+53+33),创建一个C#控制台应用程序,输出所有的水仙花数 .
StaticvoidMain(string[]args){For(inti=1;i<100;i++){For(intj=1;j<100;j++){for(intk=1;k...
Static void Main(string[] args)
{
For(inti=1;i<100;i++)
{
For(int j=1;j<100;j++)
{
for(int k=1;k<100;k++)
{
_______________________;
_______________________;
If(n=m)
Console.writeline(m)
}
}
}
} 展开
{
For(inti=1;i<100;i++)
{
For(int j=1;j<100;j++)
{
for(int k=1;k<100;k++)
{
_______________________;
_______________________;
If(n=m)
Console.writeline(m)
}
}
}
} 展开
2个回答
展开全部
应该是 153=1^3+5^3+3^3 吧
3个for好像不太对
Static void Main(string[] args)
{
//int m,n;
For(int i=1;i<10;i++)
{
For(int j=0;j<10;j++)
{
for(int k=0;k<10;k++)
{
int m=i*100+j*10+k; //这里int定义最好放到开头处
int n=i*i*i+j*j*j+k*k*k;
If(n==m)Console.writeline(m); //注意这里是==
}
}
}
}
或者:
Static void Main(string[] args)
{
int i,j,k,m,n;
for(m=100;m<1000;m++)
{
i=m/100;
j=(m/10)-i*10;
k=m%10;
n=i*i*i+j*j*j+k*k*k;
if(m==n)Console.writeline(m);
}
}
2015-07-14
展开全部
面Excel宏.其程序参照改编.
Sub Sxh()
Dim s1, s2, s3, m, n As Integer
m = 1
n = 1
For i = 101 To 999 Step 1
s1 = Val(Mid(i, 1, 1))
s2 = Val(Mid(i, 2, 1))
s3 = Val(Mid(i, 3, 1))
If i = s1 * s1 * s1 + s2 * s2 * s2 + s3 * s3 * s3 Then
Sheet1.Cells(m, n).Value = i
Sheet1.Cells(m, n + 1).Value = s1
Sheet1.Cells(m, n + 2).Value = s2
Sheet1.Cells(m, n + 3).Value = s3
m = m + 1
end If
next
end Sub
运行结共4
153
370
371
407
Sub Sxh()
Dim s1, s2, s3, m, n As Integer
m = 1
n = 1
For i = 101 To 999 Step 1
s1 = Val(Mid(i, 1, 1))
s2 = Val(Mid(i, 2, 1))
s3 = Val(Mid(i, 3, 1))
If i = s1 * s1 * s1 + s2 * s2 * s2 + s3 * s3 * s3 Then
Sheet1.Cells(m, n).Value = i
Sheet1.Cells(m, n + 1).Value = s1
Sheet1.Cells(m, n + 2).Value = s2
Sheet1.Cells(m, n + 3).Value = s3
m = m + 1
end If
next
end Sub
运行结共4
153
370
371
407
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询