求数据为三位正整数 并且它的其各个数字之和等于10 用VB怎麼做
来源:学生作业帮 编辑:搜搜做题作业网作业帮 分类:数学作业 时间:2024/04/30 13:41:29
求数据为三位正整数 并且它的其各个数字之和等于10 用VB怎麼做
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等于几?原数是几?