首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
某人编写了如下程序,用来求10个整数(整数从键盘输入)中的最大值: Private Sub Commandl_Click() Dim a(10)As Integer,max As Integer For k=1 To 10
某人编写了如下程序,用来求10个整数(整数从键盘输入)中的最大值: Private Sub Commandl_Click() Dim a(10)As Integer,max As Integer For k=1 To 10
admin
2020-06-30
55
问题
某人编写了如下程序,用来求10个整数(整数从键盘输入)中的最大值:
Private Sub Commandl_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)<max Then
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/ZIHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
假定编写了如下的Sub过程:PublicSubProc(a()AsInteger)StaticiAsIntegerDoa(i)=a(i)+a(i+1)i=i+1LoopWhilei<2EndSub编写如下事件过程:Priv
当用()方式打开文件时,如果对文件进行写操作,则写入的数据附加到原文件的后面。
一个教师可讲授多门课程,一门课程可由多个教师讲授。则实体教师和课程间的联系是()。
单击命令按钮执行以下程序,则输出结果为()。PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerx=14:y=48:CallProc(x,y)P
以下关于文件的叙述中,错误的是( )。
在软件开发中,需求分析阶段产生的主要文档是()。
以下关于通用对话框的叙述中,错误的是( )。
将窗体的KeyPreview属性设为True,然后编写如下程序:PrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAsInteger)PrintChr(KeyCode)
下面描述中不属于数据库系统特点的是
A、自然连接B、交C、投影D、并A关系R和关系S有公共域,关系T是通过公共域的等值进行连接的结果,符合自然连接,选A。
随机试题
提高剪断面质量的主要措施是什么?
在工件测量过程中,通常都以()℃为标准,凡偏离了这个温度,测量所造成的长度误差都是温度误差。
13受体阻断药抑制心脏功能,不能用于治疗慢性心力衰竭。
作为关节功能面,许多关节病最早破坏的髁状突关节斜面是
下列哪项属于组织的损伤性改变?()
案情:2007年2月,甲乙丙丁戊五人共同出资设立北陵贸易有限责任公司(简称北陵公司题)。公司章程规定:公司注册资本500万元;持股比例各20%;甲、乙各以100万元现金出资,丙以私有房屋出资,丁以专利权出资,戊以设备出资,各折价100万元;甲任董事长兼总经
以下不属于股份发行登记的是()。
贷款定价通常由()等因素决定。
有三个关系R、S和T如下:由关系R和S通过运算得到关系T,则所使用的运算为( )。
MaryBarramadehistorylastyearwhenshebecamethefirstwomantoleadthedevelopmentofnewcarsandtrucksatGeneralMoto
最新回复
(
0
)