首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
某人编写了如下程序,用来求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
27
问题
某人编写了如下程序,用来求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全国计算机二级
相关试题推荐
在名称为Form1的窗体上画三个命令按钮(名称分别为Command1、Command2和Command3,标题分别为“显示”、“统计”和“保存”),然后画一个文本框(名称为Text1,MultiLine属性设置为True,ScrollBars属性设置为2
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在标题为“列表框”、名称为Form1窗体上画一个名称为lstCourse列表框,通过属性窗口输入四个列表项:“语文”、“数学”、“外语”、“体育”,列表项采用“复
以下关于框架的叙述中,错误的是
设窗体上有1个名称为List1的列表框,程序运行时,如果选中了第3个列表项(最上面的列表项为第0个列表项),则下面不成立的是
窗体上有一个名称为VScroll1的垂直滚动条,为了设定单击滚动条两端箭头时的Value增量值,应设置的属性是
在结构化方法中,用数据流程图(DFD)作为描述工具的软件开发阶段是()。
设a=10,b=4,c=5,d=7,表达式a>bAndNotc
在VisualBasic中,表达式3*2\5Mod3的值是
以下能够正确退出循环的是()。
随机试题
注意的起伏是一种正常现象,能防止疲劳。()
关于政府补贴,根据WTO((补贴与反补贴措施协议》,下列说法错误的是()
在WindowsXP中,关于文件的命名,下面哪两种说法是正确的()
关于质押与抵押的关系,下列说法不正确的是()
地方课程属于()
依据《宪法》规定,在我国,享有申诉权的主体是()。
简述教学评价的原则。
设f(x)连续,且∫0xtf(2x—t)dt=arctanx2,f(1)=1,求∫12f(x)dx.
Thepressure______causesAmericanstobeenergetic,butitalsoputsthemunderaconstantemotionalstrain.
A、Theviolinwastooexpensive.B、Shewastooyoungtoplaytheviolin.C、Theviolinwastoobigforher.D、Hermotherwantedhe
最新回复
(
0
)