首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下面程序的功能是产生10个小于100(不含100)的随机正整数,并统计其中5的倍数所占比例,但程序不完整,请补充完整。 SubPR() Randomize Dim a(10) For j=1 To 10 a(i)=In
下面程序的功能是产生10个小于100(不含100)的随机正整数,并统计其中5的倍数所占比例,但程序不完整,请补充完整。 SubPR() Randomize Dim a(10) For j=1 To 10 a(i)=In
admin
2012-03-22
104
问题
下面程序的功能是产生10个小于100(不含100)的随机正整数,并统计其中5的倍数所占比例,但程序不完整,请补充完整。
SubPR()
Randomize
Dim a(10)
For j=1 To 10
a(i)=Int( _____ )
If ________ Then k=k+1
Print a(j)
Next j
Print
Print k/10
Fnd Sub
选项
答案
(Rnd*99)+1 a(i) mod 5
解析
产生10个小于100(不含100)的随机正整数,需要用到随机函数Rnd,Rnd函数是随机生成一个小于1的正数随机数,所以根据题意,填入代码为(Rnd+99)+1,而后面加上1是为了能保证取到99。根据题意可知,k表示a(i)中5的倍数的个数,只有当a(i)mod 5=0时,k=k+1。
转载请注明原文地址:https://kaotiyun.com/show/tHhp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
单击命令按钮,下列程序的执行结果是 PrivateSubBlck(xAsInteger) x=x*2+l Ifx<6Then CallBlck(x) EndIf x=x*
设在菜单编辑器中定义了—个菜单项,名为menul。为了在运行时隐藏该菜单项,应该使用的语句是
如果将文本框的MaxLength属性设置为0,则文本框中的字符不能超过
关系模型允许定义3类数据约束,下列不属于数据约束的是
执行下列语句后整型变量a的值是______。If(3-2)>2Thena=10ElseIf(10/2)=6Thena=20Elsea=30EndIf
下列可以启动VisualBasic的方法是
在默认情况下,InputBox函数返回值的类型为
表达式3^2Mod36\2^5的值是【】
可以同时删除字符前导和尾部空白的函数是______。
在数据结构中,用—组地址连续的存储单元一次存储数据元素的方式是【】结构。
随机试题
属于蛋白质代谢试验的是
关于动脉导管未闭的描述,错误的是
一名儿童患低热、阵发性痉挛性咳嗽,偶有特殊的“鸡鸣”样吼声。患者鼻咽分泌物涂片镜检可见革兰阴性短小杆菌,咳痰涂片荧光抗体染色镜检亦可见病原菌。此病可初步判断为
下列关于灭火器报废年限的表述,正确的是()。
发行人应在招股说明书及其摘要披露后10日内,将正式印刷的招股说明书全文文本一式三份,分别报送中国证监会及其在发行人注册地的派出机构。()
直接融资和间接融资的数量比例关系是运用最多、最广泛的融资结构表现形式。()
产品生命周期中在()购买者一般较多。
甲、乙二人正在讨论丙。甲:丙是尼桑公司如今最得力的销售经理。乙:这怎么可能?据我所知,丙平时开的是一辆德国车。乙的判断,包含了以下哪项假定?()
有一项工程,甲、乙、丙分别用10天、15天、12天可独自完成。现三人合作,在工作过程中,乙休息了5天,丙休息了2天,甲一直坚持到工程结束,则最后完成的天数是()。
(1)isachannel’scapacitywhichdirectlyreflectsthedatatransferrateofthechanne1.(2)functionsinaNetWarenetwo
最新回复
(
0
)