[填空题] 下面程序的功能是产生10个小于100(不含100)的随机正整数,并统计其中5的倍数所占比例,但程序不完整,请补充完整。
Sub PR()
Randomize
Dim a(10)
For j=1 To 10
a(i)=Int( [14] )
If [15] Then k=k+1
Print a(j)
Next J
Print
Print k/10
End Suh
参考答案:
a(j) Mod 5=0问题解析:
解析无
[填空题] 下面程序的功能是产生10个小于100(不含100)的随机正整数,并统计其中5的倍数所占比例,但程序不完整,请补充完整。
Sub PR()
Randomize
Dim a(10)
For j=1 To 10
a(i)=Int( [14] )
If [15] Then k=k+1
Print a(j)
Next J
Print
Print k/10
End Suh
参考答案:
a(j) Mod 5=0问题解析:
解析无上一篇 [填空题] 数据模型按不同的应用层次分为三种类型,它们是 数据模型、逻辑数据模型和物理数据模型。
下一篇 [填空题] 在窗体上建立如下图所示的界面。在列表框List1中已有若干人的简单信息,运行时Text1文本框输入一个姓或姓名,单击"查找"按钮,则在列表框中进行查找。若找到,则把该人