问题 填空题

随机生成的10个两位数,求出它们的总和和平均数。产生两位数采用的算法如下:分别产生个位数(0~9)和十位数(1~9),然后十位数乘10再加上个位数即得到一个两位数。
说明:在窗体上有一个Command1按钮,单击它将计算10个随机数的和以及平均数,并在窗体上输出平均数。
Private Sub Command1_Click()
Dim M As Integer,N As Integer,Sum As Integer
Dim I As Integer, K As Integer,Ave As Single
Sum=0
Randomize
For I=1 To 10
M=Int(9*Rnd)+1
N= 【10】
K=M*10+N
Sum= 【11】
Next I
Aver= 【12】
Print Aver
End Sub

答案

参考答案:[10]Int(10,Rnd) [11]Sum+K [12]Sum/10

解析: 根据此题产生两位随机数的规则可知,在[10]处应填随机产生的个位数,为“Int(10 * Rnd)”;为求和,产生一个两位数后,应把它加到表示和的变量Sum中去,故[11]处应填“Sum+K”;通过一个循环把产生的10个两位数和放到变量Sum中,数组元素的平均值就是Sum/10,故[12]处应填“Sum/10”。

单项选择题 A型题
单项选择题