首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设a、b都是自然数,为求a除以b的余数,某人编写了以下函数: Function fun(a As Integer,b As Integer) While a>b a=a-b Wend fun=a End Fun
设a、b都是自然数,为求a除以b的余数,某人编写了以下函数: Function fun(a As Integer,b As Integer) While a>b a=a-b Wend fun=a End Fun
admin
2018-10-18
21
问题
设a、b都是自然数,为求a除以b的余数,某人编写了以下函数:
Function fun(a As Integer,b As Integer)
While a>b
a=a-b
Wend
fun=a
End Function
在调试时发现函数是错误的。为使函数能产生正确的返回值,应做的修改是
选项
A、把a=a-b改为a=b-a
B、把a=a-b改为a=a\b
C、把While a>b改为While a
D、把While a>b改为While a>=b
答案
D
解析
本题函数过程的原代码仅适合a不能被b整除的两数,而当a能被b整除时则不适用,如a=4,b=2,a除以b的余数为0,而原代码返回的函数值为2。因此需将语句While a>b改为While a>=b。
转载请注明原文地址:https://jikaoti.com/ti/Xfm0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
编写如下程序:PrivateSubCommand1_Click() DimmAsInteger,nAsInteger m=1:n=0 DoWhilem
以下关于变量作用域的叙述中错误的是( )。
窗体上有一个名称为Timer1的计时器控件,一个名称为Shape1的形状控件,其Shape属性值为3(Circle)。编写程序如下:PrivateSubForm_Load() Shape1.Top=0 Timer1.Interval=100
在窗体上画一个名称为List1的列表框,然后编写如下程序:PrivateSubForm_Click()Fori=1To10Item="Item"&iList1.AddItemItem
为了把命令按钮设置为图形格式,其Style属性值应为
窗体上有一个名称为Command1的命令按钮,并有如下程序代码:OptionBase1PrivateSubCommand1_Click()Dima%(3,3)Fori=1To3Forj=
以下关于数组的叙述中,错误的是
设有如下Command1的单击事件过程及fun过程:PrivateSubCommand1_Click() DimxAsInteger x=Val(InputBox("请输入一个整数")) fun(x)EndSubPrivate
能够产生1到50之间(含1和50)随机整数的表达式是( )。
随机试题
结构的极限状态分为承载能力极限状态和正常使用极限状态,下列描述中,属于正常使用极限状态的是()。
来源于单子叶植物,须根先端膨大,呈纺锤形的药材是()。
根据《大气污染物综合排放标准》,关于排放速率标准分级的说法,错误的是()。
关于上市公司重大资产重组方案中基于相关资产实际盈利数超过利润预测数而设置对标的资产交易对方、管理层或核心技术人员的奖励对价、超额业绩奖励等业绩奖励安排,下列说法正确的是()。[2018年9月真题]
阅读下列材料,完成教学设计。材料一:某版本高中物理必修2教材“曲线运动”一节内容节选。曲线运动从现在开始,我们研究质点潜曲线运动时所遵循的规律。这一节的任务是找出描述曲线运动的方法,下一节将根据牛顿运动定律得出质点做曲线运动的规律。这
市长在做工作总结时说,在过去五年中的每一年,这个城市都削减教育经费,并且,每次学校官员都抱怨,减少教育经费可能逼迫他们减少基本服务的费用。但实际上,每次仅仅是减少了非基本服务的费用。因此,学校官员能够落实进一步的削减经费,而不用减少任何基本服务的费用。下列
“白日不到处,青春恰自来。苔花如米小,也学牡丹开。”请结合实际,谈谈你对这首诗的理解。
通过风险投资方式融资创建的公司比通过其他渠道融资创建的公司失败率要低。可见,与企业家个人素质、公司战略规划或公司管理结构等因素相比,融资渠道对于一个新公司的成功发展是更为重要的因素。如果以下哪项陈述为真,将最有力地削弱上述论证?
Kevin:IamafraidI’vespiltinkoverthetablecloth.Tommy:______
[A]sturdy[I]explanation[B]vessels[J]consequences[C]Previously[K]nasty[D]perseverance[L]reproaching[E]nailing
最新回复
(
0
)