在窗体中添加一个命令按钮,(其Name属性为Command1),然后编写代码。程序的功能是产生100个小于1000(不含1000)的随机正整数,并统计其中5的倍数所占比例。请在【 】和【 】、【 】处填入适当的内容,将程序补充完整。 Pri

admin2009-02-13  35

问题 在窗体中添加一个命令按钮,(其Name属性为Command1),然后编写代码。程序的功能是产生100个小于1000(不含1000)的随机正整数,并统计其中5的倍数所占比例。请在【  】和【  】、【  】处填入适当的内容,将程序补充完整。
     Private Sub Command1_Click(    )
        Dim a(100)
        For j=1 To 100
           a(j)=Int (【  】)
        If a(j)【  】5=0 Then【  】
           Print a(j)
        Next j
        Print
        print k/100
      End Sub

选项

答案(999*Rnd)+1 , Mod , k=k+1

解析 If语句判断数组中5的倍数,故[13]填:Mod,表示取模。
   由于要计算出5的倍数所占的比例,故每判断出一个5的倍数,便令一个变量加1,观察Print k/100可以得出该变量为k。故[14]填:k=k+1。
转载请注明原文地址:https://jikaoti.com/ti/eF80FFFM
0

最新回复(0)