判断水仙花数。在文本框1中输入一个3位数,若是水仙花数,则在文本框2中显示“是水仙花数”,否则显示“不是水仙花数”。
- 提问者网友:记得曾经
- 2021-05-10 23:42
小知识:水仙花数是指一个n(>=3)位数字的数,它等于各位数字的n次幂之和。
一个三位数其各位数字立方和等于该数本身,这个数就是水仙花数。如153是一个“水仙花数”,因为153=13+53+33。
提示:先输入一个三位数,取出这个数每位上的数字,再用选择结构语句进行判断。
- 五星知识达人网友:神的生死簿
- 2021-05-11 00:38
添加两个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
- 1楼网友:野慌
- 2021-05-11 04:57
这题你们也教,教坏孩子呀..
书上一大把.
- 2楼网友:行雁书
- 2021-05-11 04:15
#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='不是水仙花数'
}
- 3楼网友:动情书生
- 2021-05-11 03:54
- 4楼网友:上分大魔王
- 2021-05-11 02:24
?
为什么你说的2句话自相矛盾?
“小知识:水仙花数是指一个n(>=3)位数字的数,它等于各位数字的n次幂之和。”
“一个三位数其各位数字立方和等于该数本身,这个数就是水仙花数。如153是一个“水仙花数”,因为153=13+53+33。”
- 5楼网友:天凉才是好个秋
- 2021-05-11 01:59
大哥!你要用什么语言编写……