首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
某人为计算n!(0<n<=1 2)编写了下面的函数过程: Private Function fun(n As Integer)As Long Dim P As Long p=1
某人为计算n!(0<n<=1 2)编写了下面的函数过程: Private Function fun(n As Integer)As Long Dim P As Long p=1
admin
2013-10-16
55
问题
某人为计算n!(0<n<=1 2)编写了下面的函数过程:
Private Function fun(n As Integer)As Long
Dim P As Long
p=1
For k=n-1 To 2 Step-1
p=p*k
Next k
fun=p
End Function
在调试时发现该醺数过程产生的结果是错误的,程序需要修改。下面的修改方案中有3种是正确的,错误的方案是
选项
A、把P=1改为P=n
B、把For k=n-1 To 2 Step-1改为For k=1 To n-1
C、把For k=n-1 To 2 Step-1改为For k=1 To n
D、把For k=n-1 To 2 Step-1改为For k=2 To n
答案
B
解析
本题考查的考点是有关循环次数的。本题题干中程序的错误在于,p的值是从1一直乘到n-1的值,也就是n-1的阶乘。选项A)可以在这个基础上再乘n就得到n的阶乘;选项C)和D)都能够保证从1乘到n,只有选项B)是错误的。
转载请注明原文地址:https://kaotiyun.com/show/SLQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个命令按钮(名称为Command1),然后编写如下事件过程:PrivateSubCommand_Click()StaticbAsIntegerb=b+1EndSub运行程序,第3次单击
以下语句的输出结果是______。a=123b=456Printa;b
语句Print4+5\6*7/8Mod9的值是______。
下列程序是将数组a的元素倒序交换,即第一个变为最后一个,第二个变为倒数第二个,依此类推。设数组中有8个元素。完成下列程序。PrivateSubOrderChange(a())DimiAsInteger,TempAsIntegerFor
在名为Form1的窗体上建立一个二级下拉菜单(菜单项见下表)。注意:文件必须存放在考生文件夹中,工程文件名为CXeCise95.vbp,窗体文件名为execiSe95.frm。
在名为Form1的窗体上绘制一个命令按钮,名为Cmd1,标题为“复制”;再绘制一个文本框,名为Text1。请编写适当的事件过程,使得在运行时,若单击命令按钮,则把按钮上的标题复制到文本框中(如下图所示)。注意:程序中不得使用任何变量;文件
下面叙述中错误的是______。
如果一个变量未经定义就直接使用,则该变量的类型为
下列说法不正确的是()。
下列关于文件的叙述中,说法不正确的是()。
随机试题
A、Freshmeat.B、Freshfruit.C、Biscuit.D、Chocolate.B原文提到,只有新鲜蔬菜和水果通常是不需要包装的,所以选B。这道题符合“听到什么就选什么”的原则。如果听到的不只一项,则需要在旁边做笔记来帮助判断。听
固体催化剂使用载体的目的在于使活性组分有高度的分散性,增加催化剂与反应物的接触面积。
外科治疗门静脉高压症最主要的目的是
奶牛,3岁,采食饲料后不久突然出现不安,回头顾腹,左侧腹部明显增大,叩诊鼓音区增大,呼吸困难。则关于该患牛说法正确的是
肠风脏毒下血,治疗宜选用的方剂是
某公司2009年7月发生以下业务:(1)出租房屋取得租金收入10万元;(2)派本单位员工赴境外为境外企业提供劳务服务,取得收入15万元;(3)将自产成本为30万元、市价为45万元的商品投资人股某贸易公司,评估价为40万元:
对联要求()。这些特点都和律诗有某些相似之处,所以有人把对联称为张贴的诗。
Thepurposeoflifelongemploymentisto______.Bytrainingitsemployees,acompanycanmakethem______.
A、Iamalone.B、Fine,thanks.C、Whataboutyou?D、It’slate.B本题考查的是对问候语的回答。Howareyou?/How’sitgoing?/Howareyougettingalo
TheSixthSenseWhenyouwereachild,didyoueverwonderhowyourmotherknewwhenyouwerewritingonthewallwithcrayo
最新回复
(
0
)