首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
某人编写了如下程序,用来求10个整数(整数从键盘输入)中的最大值: Private Sub Command1_Click() Dim a(10)As Integer, max As Integer For k=1 To 10 a(k)=In
某人编写了如下程序,用来求10个整数(整数从键盘输入)中的最大值: Private Sub Command1_Click() Dim a(10)As Integer, max As Integer For k=1 To 10 a(k)=In
admin
2018-12-20
42
问题
某人编写了如下程序,用来求10个整数(整数从键盘输入)中的最大值:
Private Sub Command1_Click()
Dim a(10)As Integer, max As Integer
For k=1 To 10
a(k)=InputBox("输入一个整数")
Next k
max=0
For k=1 To 10
If a(k)>max Then
max=a(k)
End If
Next k
Print max
End Sub
运行程序时发现,当输入10个正数时,可以得到正确结果,但输入10个负数时结果是错误的,程序需要修改。下面的修改中可以得到正确运行结果的是( )。
选项
A、把If a(k)>max Then改为If a(k)
B、把max=a(k)改为a(k)=max
C、把第2个循环语句For k=1 To 10改为For k=2 To 10
D、把max=0改为max=a(10)
答案
D
解析
程序中把变量max的初始值设置为0,没有考虑到负数的情况。应该把它的初始值设置为数组中的一个元素的值,然后让数组中的各个元素与这个值比较,如果比它大,就替换变量max的值,这样才能得到数组中的最大值。因此要修改max=0这一行。
转载请注明原文地址:https://kaotiyun.com/show/A8Fp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列说法中,错误的是( )。
语句DimArr(-2To4)AsInteger所定义的数组的元素个数为( )。
以下叙述中正确的是( )。
窗体上有一个名称为VScroll1的垂直滚动条,要求程序运行时,滚动块的初始位置在最下端,应该使VScroll1.Value的值等于( )。
公司中有多个部门和多名职员,每个职员只能属于一个部门,一个部门可以有多名职员。则实体部门和职员间的联系是
A、选择B、差C、交D、并B关系T是关系R的一部分,并且是关系R去掉R和S相同的元素,符合差操作。
数据库管理系统是( )。
设循环队列的存储空间为Q(1:35),初始状态为front=rear=35。现经过一系列入队与退队运算后,front=15,rear=15,则循环队列中的元素个数为
下列循环中,可以正常结束的是( )。
随机试题
简述学校健康促进的意义。
目的港(地)检验
修建某双车道公路隧道,已知洞口地质条件为破碎的Ⅴ级围岩,雨季地表水丰富,洞顶覆土为:10m。结合上述内容,回答下列问题。山岭公路隧道施工方法包括()。
漏洞险情的抢护方法有()。
梁下部纵向受力钢筋接头位置宜设置在()。
A公司是一个生产和销售通讯器材的股份公司。假设该公司适用的所得税税率为25%。对于明年的预算出现三种意见:方案一:维持目前的生产和财务政策。预计销售45000件,售价为240元/件,单位变动成本为200元,固定成本为120万元。公司的资本结构为负债400
劳动合同管理制度的内容包括()。
新中国成立,尤其是土地制度的改革完成后,我国困内的主要矛盾已转变为
A.approachB.attainC.deficit-orientedD.eagerE.failF.formalG.generallyH.knowledge-orientedI.
Oneinsix.Believeitornot,that’sthenumberofAmericanswhostrugglewithhunger.Tomaketomorrowalittlebetter,Feedin
最新回复
(
0
)