首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有如下事件过程: Private Sub Command1_Click() Dim a a=Array(12, 3, 8, 5, 10, 3, 5, 9, 2, 4) For k=1 To 9 Print fun(a(k-1), a(
设有如下事件过程: Private Sub Command1_Click() Dim a a=Array(12, 3, 8, 5, 10, 3, 5, 9, 2, 4) For k=1 To 9 Print fun(a(k-1), a(
admin
2019-03-14
57
问题
设有如下事件过程:
Private Sub Command1_Click()
Dim a
a=Array(12, 3, 8, 5, 10, 3, 5, 9, 2, 4)
For k=1 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 1 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=1时,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,10),x>=y不成立,函数直接返回5;
k=5时,fun(a(k-1),a(k))即fun(a(4),a(5)),即fun(10,3),过程中x=x-y=10-3=7-3=4-3=1,函数返回1;
k=6时,fun(a(k-1),a(k))即fun(a(5),a(6)),即fun(3,5),x>=y不成立,函数直接返回3;
k=7时,fun(a(k-1),a(k))即fun(a(6),a(7)),即fun(5,9),x>=y不成立,函数直接返回5;
k=8时,fun(a(k-1),a(k))即fun(a(7),a(8)),即fun(9,2),过程中x=x-y=9-2=7-2=5-2=3-2=1,函数返回1;
k=9时,fun(a(k-1),a(k))即fun(a(8),a(9)),即fun(2,4),x>=y不成立,函数直接返回2;
因此程序输出0 3 3 5 1 3 5 1 2 。
转载请注明原文地址:https://kaotiyun.com/show/8OFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
编写如下程序:PrivateSubForm_Click()Dimaa=Array(1,2,3,4,5,6,7,8,9,10)n=InputBox("请输入一个小于10的正整数")i
下面关于鼠标拖放操作的叙述中错误的是
以下不能用Print方法输出数据的对象或窗口是
某二叉树共有12个结点,其中叶子结点只有1个。则该二叉树的深度为(根结点在第1层)
在面向对象的程序设计中,可被对象识别的动作称为
下列说法中,错误的是
下列说法中,错误的是
要想不使用Shift或Ctrl键就能在列表框中同时选择多个项目,则应把该列表框的MultiSelect属性设置为()。
一棵二叉树共有25个结点,其中5个是叶子结点,则度为1的结点数为()。
随机试题
毛泽东《论十大关系》报告所围绕的基本方针是()
猪带绦虫寄生于人体危害最大的是
患者被汽车撞伤,右上腹剧痛,呼吸36次/分,脉搏100次/分,血压90/65mmHg,诊断不明,禁用
速动资产包括()等。
甲公司与乙公司(均为一般纳税人)签订一份易货合同,合同约定甲公司以自己生产的一批A产品与乙公司等值交换,换取乙公司自产的B产品一批。根据增值税法律制度的规定,下列说法正确的是()。
西方现代人力资源管理的发展阶段不包括()。
Thecountry’sinadequatementalhealthsystemgetsthemostattentionafterinstancesofmassviolencethatthenationhasseen
数据管理技术的发展经历了(50)三个阶段。
normaldiet
A、ItisashowaimingtointroducethefictionalschoolCyprus-Rhodes.B、Itisashowaboutlifeincollegeandrelationships.C
最新回复
(
0
)