2. 计算机
  3. 随机生成的10个两位数，求出它们的总和和平均数。产生两位数采用的算法如下：分别产生个位数(0～9)和十位数(1～9)，然后十位数乘10再加上个位数即得到一个两位数。 说明：在窗体上有一个Command1按钮，单击它将计算10个随机数的和以及平均数，并

随机生成的10个两位数，求出它们的总和和平均数。产生两位数采用的算法如下：分别产生个位数(0～9)和十位数(1～9)，然后十位数乘10再加上个位数即得到一个两位数。 说明：在窗体上有一个Command1按钮，单击它将计算10个随机数的和以及平均数，并

admin2009-02-13  48
问题 随机生成的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=【  】
         K=M*10+N
         Sum=【  】
   Next I
   Aver=【  】
   Print Aver
   End Sub
选项
答案Int(10，Rn) , Sum+K , Sum/10
解析 根据此题产生两位随机数的规则可知，在[10]处应填随机产生的个位数，为“Int(10 * Rnd)”；为求和，产生一个两位数后，应把它加到表示和的变量Sum中去，故[11]处应填“Sum+K”；通过一个循环把产生的10个两位数和放到变量Sum中，数组元素的平均值就是Sum/10，故[12]处应填“Sum/10”。
转载请注明原文地址:https://kaotiyun.com/show/TE1p777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)