首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
某人编写了如下程序,用来求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-11-23
74
问题
某人编写了如下程序,用来求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=l T0 lO
Ifa(k)>max Then
max=a(k)
End If
Next k
Print max
End SUb
运行程序时发现,当输入10个正数时,可以得到正确结果,但输入10个负数时结果是错误的,程序需要修改。下面的修改中可以得到正确运行结果的是
选项
A、把If a(k)>max Then改为Ifa(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是不可以的,它没有考虑到数组元素都小于0的情况。
转载请注明原文地址:https://kaotiyun.com/show/uyGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在Selectcase结构中,使用“To表达式”来指定一个范围时,必须把【】的值写在前面。
窗体的MouseDown事件过程Form_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)有4今参数,关于这些参数,正确的描述是_________。
设在工程中有一个标准模块,其中定义了如下记录类型:TypeBooksNameAsString(10TelNumAsString*20EndType在窗体上添加一个名为Command1的命名
下面程序是由鼠标事件在窗体上画图,如果按下鼠标可以画图,双击窗体则可以清除所画图形。补充完整下面的程序。首先在窗体层定义如下变量:DimPaintStartAsBoolean编写如下事件过程:PrivateSubForm_Load()Dr
表达式"12345"<>"12345"&"ABC"的值是______。
下列叙述正确的是()。
数学式子5+(a+b)×2对应的VisualBasic表达式是_____________。
设“A="87654321"”,则表达式Val(Left(A,4)+Mid(A,4,2))的值为()。
由高中数学可知,对于连续函数f(x),若f(x1)与f(x2)值的符号相反,则在x1和x2之间必存在x0,使得f(x0)=0(该点称为"零点")。设有VB函数:PrivateFunctionf(xAsSingle)AsSingle可以返
数学式y2>x>=10在VB中应表示为
随机试题
“美学的根本问题是研究人对现实的审美关系。”这一命题出自蒋孔阳的()
下列属于县级司法行政机关对律师的管理职责的有()
目前多认为妊娠剧吐与血中________升高有关。
晚期肿瘤患者出现多发性静脉血栓及脑梗死,其原因可能是
A.全血细胞减少B.嗜碱性粒细胞增多C.骨髓中原始细胞明显增多D.酸化溶血试验阳性E.网织红细胞增多急性白血病的特点是
分组交换的特点有()。
按规定,()在运输过程中向混凝土拌合物中加水。
下列有关投标文件的送达内容的说法错误的是( )。
个体产生新奇独特的、有社会价值的产品能力或特性称之为______。
Stratford-upon-Avonisanunremarkablemarkettownbut【C1】________onelittledetail:in1564,thewifeofalocalmerchant,John
最新回复
(
0
)