[填空题] 下面程序的功能是产生10个小于100(不含100)的随机正整数,并统计其中5的倍数所占比例,但程序不完整,请补充完整。
SubPR()
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
Fnd Sub
参考答案:
(Rnd*99)+1问题解析:
解析无
[填空题] 下面程序的功能是产生10个小于100(不含100)的随机正整数,并统计其中5的倍数所占比例,但程序不完整,请补充完整。
SubPR()
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
Fnd Sub
参考答案:
(Rnd*99)+1问题解析:
解析无上一篇 [单项选择题] 下面创建一个新文件对象方法错误的是( )。
下一篇 [单项选择题] 有如下程序: long fib(int n) if(n>2) return(fib(n-1)+fib(n-2)); else return(2); void main()