随机生成的10个两位数 求出它们的总和和平均数。产生两位数采用的算法如下:分别产生个位数(0~9)和
随机生成的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(10Rn) Sum+K Sum/10
根据此题产生两位随机数的规则可知,在[10处应填随机产生的个位数,为“Int(10*Rnd)”;为求和,产生一个两位数后,应把它加到表示和的变量Sum中去,故[11处应填“Sum+K”;通过一个循环把产生的10个两位数和放到变量Sum中,数组元素的平均值就是Sum/10,故[12处应填“Sum/10”。
相似问题
在窗体上画一个列表框 一个命令按钮和一个标签 其名称分别为List1 Command1和Labe11
在窗体上画一个列表框、一个命令按钮和一个标签,其名称分别为List1、Command1和Labe11,通过属性窗口把列表框中的项目设置为:“第一个项目”、“第二个
在程序执行闲置循环过程中 程序的控制权被系统占用。若要获得控制权 可以使用一个语句 这样用户可以在获
在程序执行闲置循环过程中,程序的控制权被系统占用。若要获得控制权,可以使用一个语句,这样用户可以在获得系统的控制权后进行其他操作,这个语句是【
在窗体上画一个名称为Combo1的组合框 画两个名称分别Labe11和Labe12及Caption属
在窗体上画一个名称为Combo1的组合框,画两个名称分别Labe11和Labe12及Caption属性分别为“城市名称”和空白的标签。程序运行后,当在组合框中输入一个新
以下程序的功能是每隔一定的时间在窗体的文本框中显示当前时间 刷新的时间间隔由滚动条来设定。窗体中有三
以下程序的功能是每隔一定的时间在窗体的文本框中显示当前时间,刷新的时间间隔由滚动条来设定。窗体中有三个控件:文本框控件Text1用来显示当前时间,水
已知在窗体上有一个文本框控件 它的名称为Text1 且输入的字符全部为数字 现在要把该字符转换为整数
已知在窗体上有一个文本框控件,它的名称为Text1,且输入的字符全部为数字,现在要把该字符转换为整数送给整型变量C,所用到的语句是【 】。请帮忙给出
