填空题
下面程序的作用是利用随机函数产生10个100~300(不包含300)之间的随机整数,打印其中是7的倍数的数,并求它们的总和。请填空。
Sub TOF()
Randomize
Dim s AS Double
Dim a(10)As Integer
For i=0 To 9
______
Next
For i=0 To 9
If______Then
Print a(i)
s=s+a(i)
______
Next i
Print
Print "S=";s
End Sub
【参考答案】
a(i)=Int(Rnd() * 200+100)
a(i)Mod 7=0
End If
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
填空题
当对象得到焦点时,会触发______事件,当对象失去焦点时将触发______事件。
点击查看答案&解析
填空题
通常,将软件产品从提出、实现、使用维护到停止使用退役的过程称为______。
点击查看答案&解析
相关试题
在菜单编辑器中建立了一个菜单,名为pmenu...
在窗体上画一个文本框,名称为Text1,然后...
执行下面的程序段后,s的值为______...