首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
某人编写了如下程序,用来求10个整数(整数从键盘输入)中的最大值: Private Sub Command 1_Click() Dim a(10)As Integer,max As Integer For k=1 To 10 a(k)=InputB
某人编写了如下程序,用来求10个整数(整数从键盘输入)中的最大值: Private Sub Command 1_Click() Dim a(10)As Integer,max As Integer For k=1 To 10 a(k)=InputB
admin
2015-05-29
43
问题
某人编写了如下程序,用来求10个整数(整数从键盘输入)中的最大值:
Private Sub Command 1_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
运行程序时发现,当输入10个正数时,可以得到正确结果,但输入10个负数时结果是错误的,程序需要修改。下面的修改中可以得到正确运行结果的是
选项
A、把Ifa(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(k)改为max=a(10)
答案
D
解析
本题考查的考点是有关循环和数组的。本题为了实现求取最大值,首先应该假设数组中的某一个数就是最大值,再依次与数组元素比较,一旦某个元素比当前的最大值大,就把它作为新的最大值。max初值没为0是不可以的,它没有考虑到数组元素都小于0的情况。
转载请注明原文地址:https://kaotiyun.com/show/aDQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画两个文本框,其名称分别为Text1和Text2,然后编写如下事件过程:PrivateSubForm_Load()ShowTextl.Text=""Text2.Te
阅读程序:OptionBase1Dimarr()AsIntegerPrivateSubFormClick()DimiAsInteger,iAsIntegerReDimarr(3,2
单击命名按钮时,下列程序代码的执行结果为PublicSubprocl(nAsInteger,ByvalmAsInteger)n=nMod10m=mMod10EndSub
设有如下的记录类型:TypeStudentnumberAsStringnameAsStringageAsIntegerEndType则正确引用该记录类型变量的代码是
一个工程中包含两个名称分别为Forml、Form2的窗体,一个名称为mdlFunc的标准模块。假定在Forml、Form2和md1Func中分别建立了自定义过程,其定义格式为:Form1中定义的过程:PrivateSubfrmFun
在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序:PrivateSubCommand1_Click()StaticXAsIntegerStaticYAsIntegerCls
以下有关数组定义的语句序列中,错误的是
在长度为n的顺序表的第i(1≤i≤n+1)个位置上插入一个元素,元素的移动次数为【】。
随机试题
交易风险
WhoElectsthePresident?November7,2000isaveryspecialdayintheUnitedStates.Votersallacrossthenationare【1】re
肛瘘手术治疗中,最重要的是
西洋参的功效是
如上题所述,该同步电动机的额定容量为()kVA。
从某种意义上说,教师的()比道德宣言或道德演讲更能教育学生。
2011年,河北省农产品进出口总额41.1亿美元,同比增长21.2%,其中进口同比增长20.6%。2011.年12月,河北省农产品出口、进口额均创历史新高,当月进出口4.5亿美元,同比增长30.7%,环比增长35.0%。其中出口1.6亿美元,
评论与理论最大的区别就是时效性。理论可以在尘埃落定后再做总结性梳理,而评论则必须有快速反应的能力,需要在文艺作品发表或上演后立即开始。一些专业评论工作者不善于、甚至不屑于评论当下最热门的文艺作品或文艺现象,认为这种评论肤浅,会降低自己的身份。当新的文学艺术
ItmaybejustaswellforOxfordUniversity’sreputationthatthisweek’smeetingofCongregation,its3,552-stronggoverningb
Completethenotesbelow.WriteNOMORETHANTHREEWORDSforeachanswer."CVandInterviewSkills"SeminarThespeakersuggests
最新回复
(
0
)