问题
填空题
以下程序用来输出20个在开区间(10,87)上的随机整数R,每行输出4个整数。请完成空白处的填空。
Private Sub Command1_Click()
For I=1 To 10
R=Int(Rnd*76+11)
Print R;
If ______ Then Print
Next I
End Sub
答案
参考答案:I Mod 4=0
解析: 本题考查Int函数的用法。要产生开区间(10,87)上的随机整数,Rnd函数是产生[0,1)之间的随机数,Int函数是将浮点型或货币型数据转换成不大于给定数的最大整数。根据Int函数的用法,应该使用Int(Rnd *76+11),注意:因为开区间(10,87)从11开始,所以不能使用数字10。换行可以使用Mod语句来实现,根据题意I=4,I=8等能被4整除的数值时输出换行符号。