首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有如下Command1的单击事件过程及fun过程: Private Sub Command1_Click() Dim x As Integer x=Val(InputBox("请输入一个整数")) fun(x) E
设有如下Command1的单击事件过程及fun过程: Private Sub Command1_Click() Dim x As Integer x=Val(InputBox("请输入一个整数")) fun(x) E
admin
2018-07-11
66
问题
设有如下Command1的单击事件过程及fun过程:
Private Sub Command1_Click()
Dim x As Integer
x=Val(InputBox("请输入一个整数"))
fun(x)
End Sub
Private Sub fun(x As Integer)
If Mod 2=0 Then fun(x/2)
Print x;
End Sub
执行上述程序,输入6,结果是( )。
选项
A、3 6
B、6 3
C、6
D、程序死循环
答案
A
解析
题目中fun过程是一个递归过程,它的结束条件是参数值为奇数。第一次调用,参数值为6,是偶数所再次调用fun过程,这次参数为6/2=3,是奇数,不再调用自身,接着执行下一句输出参数值即3,然后返回第一次调用过程中执行下一句输出第一次调用参数值,即6。因此程序会输出3 6。
转载请注明原文地址:https://kaotiyun.com/show/4oFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
阅读程序:OptionBase1PrivateSubForm_Click()DimArr(3,3)AsIntegerFori=1To3Forj=1To3ifj=iOrj=3-i+1ThenArr(i
编写如下程序:PrivateSubCommandlClick()Dima(3,3)AsInteger,b(3,3)AsIntegerFori=1To3Fori=1To3a(i,j)=i+j:b(i,j):a(i
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:OptionBase1PrivateSubCommand1Click()d=0:C=10:x=Array(10,12,21,32,24)Fori=1To5
窗体上有1个Timerl计时器,1个Shapel形状控件,还有下面程序代码:DimflagAsBooleanPrivateSubTimer1Timer()PrivateSubForm_Load()
编写如下程序:PrivateSubCommand1Click()Dima(3,3)AsInteger,sAsIntegerFori=1To3Forj=1To3a(i,j)=i*j+iNextjNext
设有下面的语句:PrintIIf(x>0,1,Ilffx
使用()方法,可清除列表框中所有的列表项。
公司中有多个部门和多名职员,每个职员只能属于一个部门,一个部门可以有多名职员。则实体部门和职员间的联系是
在关系A(S,SN,D)和B(D,CN,NM)中,A的主关键字是S,B的主关键字是D,则D是A的
某个工厂有若干个仓库,每个仓库存放有不同的零件,相同零件可能放在不同的仓库中。则实体仓库和零件间的联系是
随机试题
调拨价格
“水火既济”是指哪两脏的关系
患者男,55岁。进行床一轮椅转移评定,患者能自己站起,需要较小的帮助转移到轮椅,可以独立完成由坐到站的转换,站立时推、拉患者不能保持平衡。患者此项的Bathel评分为
计算机病毒是一种程序,通常它隐藏在()中。
根据《证券公司为期货公司提供中间介绍业务试行办法》的规定,证券公司不得()。
甲公司属于建筑防水材料行业,是一家集研发、生产、销售、技术咨询和施工服务为一体的专业化建筑防水系统供应商。建筑防水材料是建筑功能材料的重要组成部分,随着国家基础设施建设力度的加大和城镇化速度的加快,其应用领域和市场容量将持续扩大。产业政策方面,国
王老师严厉责罚了小明后发现错不在小明,但因为小明是后进生,王老师就不打算道歉。对此。你怎么看?
制定教学计划首先考虑的问题是()。
公共领域的问题从来都不是科学的问题、统计数字的问题,而是主观认识的问题、意见的问题、想象的问题。在社会领域,民众的主观感觉才是最主要的客观事实。因此,在讨论公共政策问题的时候,看似准确的数字,其实并不像官员、专家们想象的那样重要。相反,如果一个国家的民众感
老王对老李说:“除非你在今天之内按照合同要求支付货款,否则我们法庭上见。”以下哪项判断的含义与上述判断不同?()
最新回复
(
0
)