首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
某人编写了如下程序,用来求10个整数(整数从键盘输入)中的最大值: Private Sub Command l_Click() Dim a(1 0)As Integer,max As Integer For
某人编写了如下程序,用来求10个整数(整数从键盘输入)中的最大值: Private Sub Command l_Click() Dim a(1 0)As Integer,max As Integer For
admin
2020-04-18
84
问题
某人编写了如下程序,用来求10个整数(整数从键盘输入)中的最大值:
Private Sub Command l_Click()
Dim a(1 0)As Integer,max As Integer
For k=1 To 10
a(k)=InputBox(”输入一个整数”)
Next k
max=0
For k=1 To 10
Ifa(k)>max Then
max=a(k)
End If
Next k
Print max
End Sub
运行程序时发现,当输入10个正数时,可以得到正确结果,但输入10个负数时结果是错误的,程序需要修改。下面的修改中可以得到正确运行结果的是
选项
A、把Ifa(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是不可以的,它没有考虑到数组元素都小于0的情况。
转载请注明原文地址:https://kaotiyun.com/show/14Tp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
若看到程序中有以下事件过程,则可以肯定的是,当程序运行时PrivateSubClick_MouseDown(ButtonAsInteger,_ShiftAsInteger,XAsSingle,YAsSingle)Pr
窗体上有名称为Commandl的命令按钮,名称分别为Labell、Label2、Label3的标签。编写如下程序:PrivatexAsIntegerPrivateSubCommandl_Click()Stat
如果在框架中画了2个复选框,且框架的Enabled属性被设置为False,2个复选框的Enabled属性被设置为True,则下面叙述中正确的是
设窗体上有一个标签Label1和一个计时器Timer1,Timer1的Interval属性被设置为1000,Enabled属性被设置为True。要求程序运行时每秒在标签中显示一次系统当前时间。以下可以实现上述要求的事件过程是
某人编写了下面的程序,希望能把Textl文本框中的内容写到out.txt文件中PPrivateSubCommandl_Click()Open”out.txt”ForOutputAs#2Print”Text1”
若变量a未事先定义而直接使用(例如:a=0),则变量a的类型是
InputBox函数返回值的类型为()。
在下列模式中,能够给出数据库物理存储结构与物理存取方法的是( )。
下列控件属性中,属性值的类型不相同的一项是()。
设循环队列的存储空间为Q(1:35),初始状态为front=rear=35。现经过一系列入队与退队运算后,front=15,rear=15,则循环队列中的元素个数为
随机试题
面部“危险三角区”的疖最危险的并发症是()。
严重烧伤休克期一般可延至伤后()
下列火灾预警能力的各项指标,定义正确的是()。
申请代理报检注册登记的单位应当具备的条件包括()。
2014年甲公司房产原值1000000元,已提取折旧350000元。已知从价计征房产税税率为1.2%,当地规定的房产税扣除比例为30%,甲公司当年应缴纳房产税税额的下列计算中,正确的是()。
湖南省最具影响力的戏曲剧种是()。
【永贞革新】扬州大学2013年中国古代史真题;湖南师范大学2016年中国史综合真题;华中师范大学2017年中国史基础真题;南京大学2017年中国古代史基础真题
设机器码的长度为8,x为带符号纯小数,y为带符号纯整数,[X]原=11111111, [Y]补=11111111,则x的十进制真值为(3),y的十进制真值为(4)。
设某二叉树的后序序列与中序序列均为ABCDEFGH,则该二叉树的前序序列为()。
用“综合业务数字网”接入因特网的优点是上网通话两不误,它的英文缩写是()。
最新回复
(
0
)