下面的程序的作用是利用随机函数产生10个100~300(不包含300) 之间的随机整数,打印其中7的倍数的数,并求它们的总和,请填空。
Sub TOF()
Randomize
Dim s As Double
Dim a(10) As Integer
For i=0 To 9
【10】
Next
For i=0 To 9
If 【11】 Then
Print a(i)
s=s + a(i)
【12】
Next i
Print "S="; s
End Sub
第1题:
1、下列说法错误的是()。
A.函数rand()用于生成一个[0,RAND_MAX]间的随机数,RAND_MAX是不大于双字节整数的最大值32767的宏常量。使用函数rand()必须在程序开头加上这样一条编译预处理指令:#include <stdio.h>###SXB###B.magic = rand()%100 + 1用于生成[1,100]之间的随机数。###SXB###C.事实上,函数rand()产生的都是伪随机数。###SXB###D.函数srand()用于为rand()设置随机数种子,使rand()产生的随机数“随机化”。第2题:
编写程序,生成包含1000个0~100之间的随机整数,统计并输出每个整数出现的次数。
第3题:
1、【文件】请用随机函数产生500行1-100之间的随机整数存入文件random.txt中,编程寻找这些整数的众数并输出,众数即为一组数中出现最多的数,注意可能存在多个众数。
第4题:
1、下列说法错误的是()。
A.函数rand()用于生成一个[0,RAND_MAX]间的随机数,RAND_MAX是不大于双字节整数的最大值32767的宏常量。使用函数rand()必须在程序开头加上这样一条编译预处理指令:#include <stdio.h>###SXB###B.magic = rand()%100 + 1用于生成[1,100]之间的随机数。###SXB###C.事实上,函数rand()产生的都是伪随机数。###SXB###D.函数srand()用于为rand()设置随机数种子,使rand()产生的随机数“随机化”。第5题:
利用数学函数Rnd()产生一个1~100之间的随机数的表达式为 。