首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
某人为计算n!(0<n<=12)编写了下面的函数过程: 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
某人为计算n!(0<n<=12)编写了下面的函数过程: 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
admin
2019-07-30
43
问题
某人为计算n!(0<n<=12)编写了下面的函数过程:
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/NiUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列有语法错误的赋值语句是
窗体上有名称分别为Text1、Text2的文本框,名称为Command1的命令按钮。运行程序,在Text1中输入“FormList”,然后单击命令按钮,执行如下程序:PrivateSubCommand1_Click()Text2.T
窗体上有一个名称为Command1的命令按钮,一个名称为Text1的文本框,其Text属性值为“VBProgramming”。运行程序后,选中其中的“VB”,并执行如下事件过程:PrivateSubCommand1_Click()T
以下能够触发文本框Change事件的操作是
在窗体上画一个命令按钮,然后编写如下事件过程:PrivateSubCommand1_ClickFori=lTo5a(i)=Chr(Asc("A")+(i-1))NextiForEachbI
窗体上有1个Timer1计时器,1个Shapel形状控件,还有下面程序代码:DimflagAsBooleanPrivateSubTimer1_Timer()PrivateSubForm_Load()
将数据项“Student”添加到名称为List1的列表框中,并使其成为列表框第一项的语句为
设菜单编辑器中各菜单项的属性设置如下表所示针对上述属性设置,以下叙述中错误的是
(1)在名称为Form1的窗体上画一个名称为Picture1的图片框(PictureBox),高、宽均为1000。在图片框内再画一个有边框的名称为Imagel的图像框(Image)。并通过属性窗口把考生目录下的图标文件POINTl1(香蕉图标)装入图像框I
数列1,1,2,3,5,8,13,21,…的规律是从第三个数开始,每个数是它前面两个数之和。在考生目录下有一个工程文件sjt5.vbp。窗体中已经给出了所有控件,如图3.121所示。请编写适当的事件过程实现以下功能:在Text1中输入整数40,单击“计算”
随机试题
根据利润表,可以进行()
静脉营养中加入精氨酸的作用包括()。
为健全测绘应急保障工作机制,有效整合利用测绘资源,提高应急测绘保障能力,为应对突发事件提供高效有序的测绘保障,国家制定了《测绘应急保障预案》,其依据是()。
背景资料某高速公路特大桥为变截面预应力混凝土连续刚构桥,其桥跨布置为70m+4×120m+70m。主梁采用箱形截面,墩身为空心墩,墩高50~75m.桥墩采用群桩基础,平均桩长约60m(见示意图)。施工单位为本桥配置了以下主要施工机械和设备:反循环钻
下列因素的变动会使得债券价值呈同向变动的是()。
员工工作绩效是()的函数。
企业债权投资获得的利息收入属于让渡资产使用权收入,()(2017年)
关于火车票签证规定,()不办理改签。
下列选项中不属于常模参照测验的是()。
下列命令中,属于Java编译命令的是()。
最新回复
(
0
)