永发信息网

判断水仙花数。在文本框1中输入一个3位数,若是水仙花数,则在文本框2中显示“是水仙花数”,否则显示“不是水仙花数”。

答案:6  悬赏:50  手机版
解决时间 2021-05-11 21:15
判断水仙花数。在文本框1中输入一个3位数,若是水仙花数,则在文本框2中显示“是水仙花数”,否则显示“不是水仙花数”。
小知识:水仙花数是指一个n(>=3)位数字的数,它等于各位数字的n次幂之和。
一个三位数其各位数字立方和等于该数本身,这个数就是水仙花数。如153是一个“水仙花数”,因为153=13+53+33。
提示:先输入一个三位数,取出这个数每位上的数字,再用选择结构语句进行判断。
最佳答案

添加两个text 和一个command 对command的单击事件添加如下代码.


Private Sub Command1_Click()
Dim q As Integer
Dim b As Integer
Dim s As Integer
Dim n As Integer


n = Val(Text1.Text)


q = n \ 100
'求出百位数字
b = (n - q * 100) \ 10
'求出十位数字
s = n Mod 10
'求出个位数字


If ((q * q * q + b * b * b + s * s * s) = n) Then
Text2.Text = "是水仙花数!"
Else
Text2.Text = "不是水仙花数!"
End If
End Sub

全部回答

这题你们也教,教坏孩子呀..

书上一大把.

#include <stdio.h> int cheack(int n) { int i, j, k; for (n = 100; n < 1000; n++) { i = n / 100; j = n / 10 - i * 10; k = n - i * 100 - j * 10; if (i*i*i + j*j*j + k*k*k == n) return 1; } return 0; }

----

if(cheack(Convert.int30(TextBox1.Text);))

{

TextBox2.Text='是水仙花数'

}else{

TextBox2.Text='不是水仙花数'

}

#include <iostream.h> void main() { int a[100]; int count=0,i,x,y,z; cout<<"请输入待测数,以0结束。"<<endl; do { cin>>a[count]; }while(a[count++]!=0); count--; for(i=0;i<count;i++) { x=a[i]%10; y=a[i]/10%10; z=a[i]/100; if (x*x*x+y*y*y+z*z*z==a[i]) cout<<"Case "<<i+1<<":"<<a[i]<<",Yes"<<endl; else cout<<"Case "<<i+1<<":"<<a[i]<<",No"<<endl; } }

?

为什么你说的2句话自相矛盾?

“小知识:水仙花数是指一个n(>=3)位数字的数,它等于各位数字的n次幂之和。”

“一个三位数其各位数字立方和等于该数本身,这个数就是水仙花数。如153是一个“水仙花数”,因为153=13+53+33。”

大哥!你要用什么语言编写……

我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
怎么出去胶纸痕迹?
美瞳平光效果好的,最少多少钱。?
写读后感可以用题记开头吗?
服装与饮食有何源渊?
091018.SBS.人气歌谣 G-Dragon.少年啊下载地
按劳动法规定:员工罚款最多罚到多少?
QQ面板缩小了
계속하다 是什么意思啊
怎样才能让女生更喜欢自己
腾冲一职校可不可以读幼师
滨海新区什么时候成立,天津滨海新区属于什么
维生素E能不能吃阿?
世上是否还有女孩子真心爱我?能否白头到老
求wow3.13冰法升级天赋
周杰伦有什么好听的歌啊
推荐资讯
国内换港币到哪个银行,什么银行可兑换港币
现在学生适合用什么手机?
佳能滤镜怎么安装,单反要装什么滤镜
明 天 会 怎 么 样 呢 ?
滑膜炎吃什么药好得快,滑膜炎用什么消炎药好
DNF转职任务可以帮我吗?
地下城游戏不能玩了
PS发菲林时怎样做补色
推荐点好看的科幻,灾难片
剧场版火影疾风传《失落之塔》什麽时候在网上
北京如何办理异地医保,如何办理医保异地就医
一代宗师宫宝森台词,在电影《一代宗师》里面
正方形一边上任一点到这个正方形两条对角线的
阴历怎么看 ?