首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
某人编写了如下程序,用来求10个整数(整数从键盘输入)中的最大值: Private Sub Commandl—Click() Dim a(10)As Integer,max As Integer For k=l To 10
某人编写了如下程序,用来求10个整数(整数从键盘输入)中的最大值: Private Sub Commandl—Click() Dim a(10)As Integer,max As Integer For k=l To 10
admin
2019-03-14
32
问题
某人编写了如下程序,用来求10个整数(整数从键盘输入)中的最大值:
Private Sub Commandl—Click()
Dim a(10)As Integer,max As Integer
For k=l 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改为Ⅱ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/MzUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下打开VisualBasic菜单编辑器的操作中,错误的是( )。
(1)在考生文件夹下有一个工程文件sjt3.vbp,其功能是:①单击“读数据”按钮,则将考牛文件夹下in3.dat文件中的100个正整数读入数组a中。②单击“计算”按钮,则找出这100个正整数中的所有完全平方数(一个整数若是另一个整数的
窗体上有1个Timer1计时器,1个Shape1形状控件,还有下面程序代码:DimflagAsBooleanPrivateSubForm_Load()flag=TrueTimer1.En
有下面的程序段:x=InputBox("字符串","输入","请输入")Printx如果执行上面程序段时没有从键盘输入任何内容就直接按了回车键,则输出内容是
以下关于控件的叙述中,正确的是
以下关于窗体的叙述中错误的是
阅读程序:PrivateSubForm)_Click(a=0Forj=1To15a=a+jMod3NextjPrintaEndSub程序运行后,单击窗体,输出结果是
在编辑VB应用程序时,如果不小心关闭了属性窗口,则可以单击主窗口标准工具栏上的一个按钮直接打开属性窗口,这个按钮的图标是
产生100以内(不含100)2位随机整数的VisualBasic表达式是
随机试题
某事业单位职员倪某正确贯彻执行党和国家的路线、方针、政策,自觉遵守国家的法律、法规和各项规章制度,廉洁自律,熟悉业务,工作积极,能够完成工作任务。对其应认定为哪一等次的考核结果?()
常用的制馅干菜类的原料有木耳、_______、黄花菜等。
引起不随意注意的原因是什么?
斜角肌间隙位于何处?有哪些结构通过?
房间隔缺损的血流动力学改变常引起
茎木类中药有异型维管束结构的药材是
下列各项中,不应计提固定资产折旧的是()。
文章的标题叫“我的家在哪里”,从文中看,真正能算是“我的家”的一项是:对文章结尾段画线句子理解分析不正确的一项是:
曲线
设向量α=(a1,a2,…,an)T,β=(b1,b2,…,bn)T都是非零向量,且满足条件αTβ=0.记n阶矩阵A=αβT,求:(1)A2;(2)矩阵A的特征值和特征向量.
最新回复
(
0
)