首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有如下事件过程: Private Sub Commandl_Click() Dim a a=Array(12,3,8,5,10,3,5,9,2,4) For k=l To 9 Print fun(a(k一1),
设有如下事件过程: Private Sub Commandl_Click() Dim a a=Array(12,3,8,5,10,3,5,9,2,4) For k=l To 9 Print fun(a(k一1),
admin
2018-05-08
61
问题
设有如下事件过程:
Private Sub Commandl_Click()
Dim a
a=Array(12,3,8,5,10,3,5,9,2,4)
For k=l To 9
Print fun(a(k一1),a(k));“”;
Next k
End Sub
Private Function fun(X,y)As Integer
Do While X>=Y
X=X-Y
Loop
fun=X
End Function
程序运行时的输出结果是( )。
选项
A、4 0 1 0 3 0 0 4 0
B、0 3 3 5 1 3 5 l 2
C、9 -5 3 -5 7 -2 -4 7-2
D、9 3 3 5 7 3 5 7 2
答案
B
解析
数组默认下标为0,因此数组a中的元素a(0)=12,a(1)=3,a(2)=8,a(3)=5,a(4)=10,a(5)=3,a(6)=5,a(7)=9,a(8)=2,a(9)=4。
k=l时,fun(a(k-1),a(k))即fun(a(0),a(1)),即fun(12,3),过程中x=x-y=12-3=9-3=6-3=3-3=0,函数返回0;
k=2 时,fun(a(k-1),a(k))即fun(a(1),a(2)),即fun(3,8),x>=y不成立,函数直接返回3;
k=3 时,fun(a(k-1),a(k))即fun(a(2),a(3)),即 fun(8,5),过程中x=x-y=8-5=3,函数回返3;
k=4 时,fun(a(k-1),a(k))即fun(a(3),a(4)),即fun(5,l0),x>=y不成立,函数直接返回5;
k=5时,fun(a(k-1),a(k))即tun(a(4),a(5)),即fun(10、3),过程中 x=x-y=10-3=7-3=4-3=1,函数返回1;
k=6 时,fun(a(k-I),a(k))即fun(a(5),a(6)),即fun(3,5),x>=y不成立,函数直接返回3;
k=7时,flirt(a(k-1),a(k))即fun(a(6),a(7)),即fun(5,9 ),x>=y不成立,函数直接返回5;
k=8 时,fun(ak—1),a(k))即fun(a(7),a(8)),即fun(9,2),过程中 x=x-y=9-2=7-2=5-2=3-2=l,函数返回1;
k=9 时,tun(a(k-1),a(k))即tun(a(8),a(9)),即fun(2,4),x>=y不成立,函数直接返回2;
因此程序输出0 3 3 5 l 3 5 l 2。
转载请注明原文地址:https://kaotiyun.com/show/yvGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有三个关系R、S和T如下:则由关系R和S得到关系T的操作是
下列关于栈的描述中错误的是
在软件开发中,需求分析阶段产生的主要文档是
(1)请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。在名称为Forml的窗体上画一个名称为Picturel的图片框(PictureBox),高、宽均为1000。在图片框内再画一个有边框的名称为Imagel的图像框(Imag
关于菜单设计,下列叙述中错误的是()。
Fibonacci数列的规律是:前2个数为1,从第3个数开始,每个数是它前2个数之和,即:1,1,2,3,5,8,13,21,34,55,89,…。某人编写了下面的函数,判断大于1的整数x是否是Fibonacci数列中的某个数,若是,则返回True,否则返
为了实现对象的自动拖放,应该设置该对象的一个属性。下面设置中正确的是
下面不是键盘事件的是
用LineInput语句从顺序文件读出数据时,每次读出一行数据。所谓一行是指遇到()分隔符,即认为一行的结束。
在考生目录下有一个工程文件sjt4.vbp,包含了所有控件和部分程序,如图2-93所示。要求如下:①利用属性窗口设置适当的属性:为Listl列表框添加三个项目:宋体、黑体、楷体_GB2312;Textl文本框设置初始值为”计算机”;Hscroll1水
随机试题
甲股份有限公司委托乙证券公司发行普通股,股票面值总额20000万元,发行总额80000万元,发行费按发行总额的2%计算(不考虑其他因素)。股票发行净收入全部收到。甲股份有限公司因该笔业务记入“资本公积”科目的金额为()万元。
股骨颈骨折的典型表现是
急性牙髓炎的疼痛性质中,最具诊断特点的是
患者,男,62岁。咳嗽30年,近日咳大量脓痰,气憋,下肢水肿本病最主要的治疗原则是
根据《中华人民共和国大气污染防治法》饮用水水源保护的有关规定,饮用水水源二级保护区禁止建设的项目有()。
发现直接危及人身安全的紧急情况时,从业人员停止作业或者在采取可能的应急措施后处理作业场所的权利是()。
会计职业道德教育的途径有()。
教学过程的基本要素为______、______和______。
52220
IwenttoaCatholicboysschoolinBlackpoolintheNorthofEngland.InmyfirstyearintheseniorschoolIwasanerdykid,
最新回复
(
0
)