首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
某人编写了如下程序,用来求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
2020-06-30
49
问题
某人编写了如下程序,用来求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/VGHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下程序段的功能是:从文本框中输入一个数值,如果该数值满足“除以4余1,除以5余2”的条件,则在窗体上输出文本框中的数值,否则,将焦点定位在文本框中,并清除文本框的内容,在横线处应填写()。PrivateSubComm
下面叙述中错误的是()。
在考生目录下有一个工程文件vbsj5.vbp。其功能是产生并显示一个数列的前n项。数列产生的规律是:数列的前2项是小于10的正整数,将此两数相乘,若乘积<10,则以此乘积作为数列的第3项;若乘积>=10,则以乘积的十位数为数列的第3项,以乘积的个位数为数
数列1,1,2,3,5,8,13,21,…的规律是从第三个数开始,每个数是它前面两个数之和。在考生文件夹下有一个工程文件sjt5.vbp。窗体中已经给出了所有控件,如图1-287所示。请编写适当的事件过程完成以下功能:选中一个单选按钮后,单击“计
以下关于框架的叙述中,错误的是
下面关于控件数组的叙述中正确的是
下面不能作为软件设计工具的是()。
在一个容量为15的循环队列中,若头指针front=6,尾指针rear=9,则循环队列中的元素个数为
在VisualBasic中,表达式3*2\5Mod3的值是
设循环队列的存储空间为Q(1:50),初始状态为front=rear=50。现经过一系列入队与退队操作后,front=rear=1,此后又正常地插入了两个元素。最后该队列中的元素个数为()。
随机试题
遴选非处方药时首先考虑的是
A、3~6gB、0.2~0.5gC、1.5~3gD、1~3gE、1.5~2.5g青黛内服用量是()。
对于经营性项目,其效益目标主要是投资收益()。
基本图常用的比例尺为()。
最早在大学里开设教育学课程的是【】
2017年春节期间,央视一档以古诗词为主要内容的文化综艺节目《中国诗词大会》吸引了无数低头玩手机的年轻人。节目中一个嘉宾评论道:“中国人的诗心一直在,但需要被激活。”另一位认为中国古典诗词是一座巨大的精神宝库,它唤醒了中国人内心深处的文化自信。要求:用规
________的荷塘上面,弥望的是田田的叶子。叶子出水很高,像亭亭的舞女的裙。层层的叶子中间,零星地点缀着些白花,有袅娜地开着的,有羞涩地打着朵儿的;正如一粒粒的________,又如碧天里的________,又如刚出浴的________。填入画横线部分
以下叙述中,不符合RISC指令系统特点的是()。
Untilthenineteenthirties,mostChristmastreesgrewwildintheforestorinabandonedfields;Earlytreefarmingtookplace
EveryyearU.S.growersshowercropswithanestimated971millionpoundsofpesticides,mostlytokillinsectsandweeds.But
最新回复
(
0
)