随机生成3个正整数,其中一个1位数,一个2位数,一个3位数,计算他们的平均值.VB程序设计
来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/10/04 14:36:39
随机生成3个正整数,其中一个1位数,一个2位数,一个3位数,计算他们的平均值.VB程序设计
求大神给个简略点的程序.考试要背啊- -.
求大神给个简略点的程序.考试要背啊- -.
Private Sub Command1_Click()
Randomize
Dim i As Integer, j As Integer, k As Integer
i = Int(Rnd * 10) '0-9
j = Int(Rnd * 90) + 10 '0-89 +10 即为10-99
k = Int(Rnd * 900) + 10 '0-899 +100 即为100-999
Dim result As String
result = "(" & i & "," & j & "," & k & ")/3="
MsgBox result & (i + j + k) / 3
End Sub
再问: 呃。刚刚有了答案了。不过很感谢你的回答
Randomize
Dim i As Integer, j As Integer, k As Integer
i = Int(Rnd * 10) '0-9
j = Int(Rnd * 90) + 10 '0-89 +10 即为10-99
k = Int(Rnd * 900) + 10 '0-899 +100 即为100-999
Dim result As String
result = "(" & i & "," & j & "," & k & ")/3="
MsgBox result & (i + j + k) / 3
End Sub
再问: 呃。刚刚有了答案了。不过很感谢你的回答
随机生成3个正整数,其中一个1位数,一个2位数,一个3位数,计算他们的平均值.VB程序设计
VB编写一个程序:分别随机生成3 个正整数,其中一个是1 位数、1 个是2 位数、1 个是3 位数.
VB程序设计随机产生一个四位数,将其各位上的数字安逆顺序重新组成一个正整数,由ms
VB 随机输入一个3位数正整数,然后逆序输出,产生的随机数与逆序数同时显示
vb程序设计“生成10个二位数,求出其中的最大值、最小值、平均值,并指出最大最小值是第几个随机数”
随机产生一个四位数的VB编码 谢谢了
编程:生成20个1到100之间的随机数,统计其中1位数,2位数,3位数的个数.
1,2,3中选出一个数,组成1位数,2位数,3位数,其中有那些事质数
一个四位数,他们平均数为5,其中一个数字改为9他们的平均值变为7'
一个六位数由1,2,3,4,5组成,而且任意两个位数的数字的差都为一,这样的六位数有多少个?
1,2,3,4,5,6,7,8,组成两个四位数,是其中一个四位数是另一个四位数的2倍,求这两个四位数?
vb 加法计算 一个三位数加4位数怎么表达