首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
某人编写了如下程序,用来求10个整数(整数从键盘输入)中的最大值: Private Sub Command1 Click() Dim a(10)As Integer,max As Integer For k=1 To 10
某人编写了如下程序,用来求10个整数(整数从键盘输入)中的最大值: Private Sub Command1 Click() Dim a(10)As Integer,max As Integer For k=1 To 10
admin
2017-07-28
41
问题
某人编写了如下程序,用来求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 Thcn
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://jikaoti.com/ti/Mfy0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列事件过程的功能是:建立一个名为Datal的随机文件,存放角度值及这些角度的正弦函数值和余弦函数值,角度为1,2,3,...,90。请在空白处填入适当的内容,将程序补充完整。PrivateTypeAngKAsIn
在窗体上画一个文本框、一个标签和一个命令按钮,其名称分别为Textl、Labell和Commandl,然后编写如下两个事件过程:PrivateSubCommandl_Click()S$=InputBox(“请输入一个字符串”)
若在窗体模块的声明部分声明了如下自定义类型和数组PrivateTypeTemScoreAsIntegerStrNameAsStringEndTypeDimStuden
设有如下记录类型:TypestudentNumberAsString*10NameAsString*8EndType窗体中有若干控件,单击其中的一个按钮Command1时,执行如下事件过程,该过程的功能是把数据输出到指定的文件中。根据
下列程序功能为:弹出一个对话框询问用户是否输出,如果是,则输出;否则结束。请在程序空白处填入适当内容使程序完整。SubPrintOut()DimaAsIntegera=MsgBox("输出结果?",vblnfo
随机试题
男,54岁,临床检查:牙龈边线及牙龈乳头充血水肿,牙龈增生覆盖牙冠的1/3~1/2,牙周袋深4~7mm,下前牙出现松动移位,最应询问的病史为
浮式沉井在注水下沉前进行的工作是()。
下列关于公司债券的说法,错误的是()。
JaneAusten’sfirstnovelis______.
班主任的工作是从()开始的。
【2013重庆下半年NO.14】在圆明园被烧毁之前,气势最为恢宏的是长春园和绮春园,圆明园因为此二园被称为“万园之园”。但与欧洲石式建筑不同,此二园中古建筑多采用砖木结构,火烧后主体部分就荡然无存,只剩下台基及夯土层。如今,原来并不如前二园出名的大水法因为
判定下列级数的敛散性(1)_______;(2)_______;(3)_______;(4)_______.
=_______.
将考生文件夹下HIGER\YION文件夹中的文件ARIP.BAT重命名为FAN.BAT。
Togetasenseofhowwomenhaveprogressedinscience,takeaquicktourofthephysicsdepartmentattheUniversityofCalifor
最新回复
(
0
)