求数据为三位正整数 并且它的其各个数字之和等于10 用VB怎麼做
来源:学生作业帮 编辑:百度作业网作业帮 分类:数学作业 时间:2024/07/16 15:33:40
求数据为三位正整数 并且它的其各个数字之和等于10 用VB怎麼做
![求数据为三位正整数 并且它的其各个数字之和等于10 用VB怎麼做](/uploads/image/z/5215688-8-8.jpg?t=%E6%B1%82%E6%95%B0%E6%8D%AE%E4%B8%BA%E4%B8%89%E4%BD%8D%E6%AD%A3%E6%95%B4%E6%95%B0+%E5%B9%B6%E4%B8%94%E5%AE%83%E7%9A%84%E5%85%B6%E5%90%84%E4%B8%AA%E6%95%B0%E5%AD%97%E4%B9%8B%E5%92%8C%E7%AD%89%E4%BA%8E10+%E7%94%A8VB%E6%80%8E%E9%BA%BC%E5%81%9A)
Private Sub Form_Load()
For i = 1 To 9
For j = 0 To 9
For k = 0 To 9
If i + j + k = 10 Then
If 100 * i + 10 * j + k < 1000 And 100 * i + 10 * j + k > 99 Then
MsgBox 100 * i + 10 * j + k
End If
End If
Next k
Next j
Next i
End Su
For i = 1 To 9
For j = 0 To 9
For k = 0 To 9
If i + j + k = 10 Then
If 100 * i + 10 * j + k < 1000 And 100 * i + 10 * j + k > 99 Then
MsgBox 100 * i + 10 * j + k
End If
End If
Next k
Next j
Next i
End Su
求数据为三位正整数 并且它的其各个数字之和等于10 用VB怎麼做
求数据为三位正整数(即100~999之间),并且它的其各个数字之和等于10 用VB怎麼做
vb 要求输出3位正整数,各个数字之和等于10,每行显示5个数据,每个数据占6列. 求高手看下这个行数的问题
编写一个程序,求所有的三位正整数(即100~999之间)中有多少个整数其各个数字之和等于10.
编写一个程序,求所有的三位正整数(即100~999之间)中有多少个整数其各个数字之和为7的倍数.
VB编程:一个三位整数,它的百位数字、十位数字以及个位数相加等于17.求满足上述条件的三位正整数的和.
6. 编写一个程序,求所有的三位正整数(即100~999之间)中有多少个整数其各个数字之和为7的倍数.(例如:
求等于其各位数字的阶乘之和的正整数
已知某个正整数的各个数字之和与各个数字之积等于这个数.求这个正整数.
求:编写程序,输入一个正整数,统计该整数的位数并计算其各个数位上的数字之和.
一个三位数减去它的各个数位上的数字之和,其差还是一个三位数38A.试求:A等于几?原数是几
一个三位数减去它的各个数位上的数字之和,其差还是一个三位数38A.试求:A等于几?原数是几?