首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有下面事件过程: Private Sub Command1_Click() Dim a(20)As Integer,n(5)As Integer Dim m As Integer,Bum As Integer Randomi
有下面事件过程: Private Sub Command1_Click() Dim a(20)As Integer,n(5)As Integer Dim m As Integer,Bum As Integer Randomi
admin
2017-07-28
45
问题
有下面事件过程:
Private Sub Command1_Click()
Dim a(20)As Integer,n(5)As Integer
Dim m As Integer,Bum As Integer
Randomize
For k=1 To 20
a(k)=Int(Rnd*5)+1
Print a(k);
n(a(k))=n(a(k))+1
Next k
Print
m=n(1)
num=1
For k=2 To 5
If n(k)>m Fhen
m=n(k)
num=k
End If
Next k
Print m.num
End Sub
此事件过程运行时会出现2行输出,如果第一行输出是:
4 2 4 1 4 1 4 5 3 2 5 5 1 4 2 3 4 3 4 2
则第2行的输出是( )。
选项
A、5 3
B、7 4
C、3 5
D、4 7
答案
B
解析
在程序过程中定义了两个数组a和n,同时定义了两个整型变量m和num,程序中Randomize的功能是可以消除一个应用程序不断重复使用随机数时,同一序列的随机数会重复出现的情况。程序进入第一个For循环中,将会产生20个[1,5]区间的整数,并将产生的随机数存放到数组a中,语句“n(a(k))=n(a(k))+1”的功能是对产生的[1,5]区间的每个数进行计数统计,并将个数存储到数组n中,接下来的第二个For循环的功能是对区间[1,5]中的每个整数的个数求最大值,并将个数最多的整数进行输出。题目中产生的20个[1,5]区间的整数的个数依次为n(1)=3;n(2)=4;n(3)=3;n(4)=7;n(5)=3,可以得知整数4生成的次数最多,为7次。故程序最终输出7和4,B选项正确。本题选择B选项。
转载请注明原文地址:https://kaotiyun.com/show/KxGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
Sub过程与Function过程最根本的区别是()。
删除组合框中指定的项目所使用的方法是()。
如果文本框的Locked属性设置为True,则下列说法正确的是()。
下列叙述中,不属于软件需求规格说明书的作用的是
下面程序的功能是产生10个小于100(不含100)的随机正整数,并统计其中5的倍数所占比例,但程序不完整,请补充完整。SubPR()RandomizeDima(10)Forj=1To10a(i)=In
一个类可以从直接或间接的祖先中继承所有属性和方法。采用这个方法提高了软件的______。
软件维护活动包括以下几类:改正性维护、适应性维护、【】维护和预防性维护。
设有下列二叉树:对此二叉树后序遍历的结果为
在程序中发现有语句:Put#1,2,num并且能够正确执行,因此可以判断
随机试题
简述普利策的办报特点。
Ifinditwholesometobealonethegreaterpartofthetime.Tobeincompany,evenwiththebest,issoonwearisomeanddissip
A.暂时制动B.牙间结扎C.颌间结扎D.切开复位,骨间固定E.暂不处理,随访
题25—29:某地上16层、地下1层的现浇钢筋混凝土框架一剪力墙办公楼,如图1-22所示。房屋高度为64.2m,该建筑地下室至地上第3层的层高均为4.5m,其余各层层高均为3.9m,质量和刚度沿高度分布比较均匀,丙类建筑,抗震设防烈度为7度,设计基本地震加
对企业事业单位的承包经营、承租经营所得,以某一纳税年度的(),为应纳税所得额。
劳务派遣是指由劳动派遣单位与劳动者订立劳动合同。()
社区建立的支持网络主要包括()。
下面历史典故与相应的历史人物对应正确的一组是:
“每当我们给个人一种影响的时候,这影响必定同时应当是集体的一种影响。相反地,每当我们设计集体的时候,同时也应当成为对于组成集体的每一个个人的教育”。这反映了马卡连柯的()。
AtallGreenwellGeneralHospitallocations,visitorsandvisitinghourswillbedecidedbythepatientandhealthcareteampri
最新回复
(
0
)