首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
某人编写了如下程序,用来求10个整数(整数从键盘输入)中的最大值: Private Sub Command 1_Click() Dim a(10)As Integer,max As Integer For k=1 To 10 a(k)=InputB
某人编写了如下程序,用来求10个整数(整数从键盘输入)中的最大值: Private Sub Command 1_Click() Dim a(10)As Integer,max As Integer For k=1 To 10 a(k)=InputB
admin
2015-05-29
37
问题
某人编写了如下程序,用来求10个整数(整数从键盘输入)中的最大值:
Private Sub Command 1_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
运行程序时发现,当输入10个正数时,可以得到正确结果,但输入10个负数时结果是错误的,程序需要修改。下面的修改中可以得到正确运行结果的是
选项
A、把Ifa(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(k)改为max=a(10)
答案
D
解析
本题考查的考点是有关循环和数组的。本题为了实现求取最大值,首先应该假设数组中的某一个数就是最大值,再依次与数组元素比较,一旦某个元素比当前的最大值大,就把它作为新的最大值。max初值没为0是不可以的,它没有考虑到数组元素都小于0的情况。
转载请注明原文地址:https://kaotiyun.com/show/aDQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上绘制一个命令按钮和一个文本框,名称分别为Command1和Text1,然后编写如下程序:PrivateSubCommand1+Click()a=InputBox(“请输入日期(1~31)”)t=“旅游景点:”
设有如下的记录类型:TypeStudentnumberAsStringnameAsStringageAsIntegerEndType则正确引用该记录类型变量的代码是
在窗体上画一个命令按钮,名称为Commandl,然后编写如下事件过程.OptionBase0PrivateSubCommand1_ClickDimcityAsVariantcity=Array(“北京”
下面对语句的功能说明中错误的是Open"Text.Dat"ForOutputAs#FreeFile
在修改列表框内容时,AddItem方法的作用是
Print方法可以在对象上输出数据,这些对象包括
在结构化设计方法中,生成的结构图(SC)中,带有箭头的连线表示
线性表的顺序存储结构和线性表的链式存储结构分别是
程序是一个窗体双击事件代码,窗体的名称是Mywindow。窗体上有一个名为text1的文本框,用来显示文本。程序段首先在文本框中显示“窗体能够触发双击事件”然后将该文本清除;重复上述过程5次。OptionExplicitPriva
计时器控件能有规律的以一定时间间隔触发______事件,并执行该事件过程中的程序代码。
随机试题
第一次国共合作的政治基础是()。
没函数f(x)=,则x=0是f(x)的()
治疗麻风病的广谱抗菌药是
下列不属于眩晕治本之法的是
监理单位的质量监理与承包商的质量控制是不同的两件事情,不能互相取代,而且缺一不可。其中,包括()三个方面的意义。
数字出版对社会文化的影响,主要表现在()。
行政执行可划分为准备、具体实施和评估三大阶段,其中实施阶段是关键环节。以下不属于行政执行实施阶段的环节是()。
设随机变量服从几何分布,其分布律为P{X=k)=(1-p)k-1p,0<p<1,k=1,2,…,求EX与DX.
设函数f(x)在[0,3]上连续,在(0,3)内存在二阶导数,且2f(0)=∫02f(x)dx=f(2)+f(3)。证明存在η∈(0,2),使f(η)=f(0);
Formanypeopletoday,readingisnolongerrelaxation.Tokeepuptheirworktheymustreadletters,reports,tradepublication
最新回复
(
0
)