首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
某人为计算n!(0<n<=12)编写了下面的函数过程: Private Function fun(n As Integer)As Long Dim p As Long p=1 For k=n-1To2Step-1 p=p*k Next k fun=p En
某人为计算n!(0<n<=12)编写了下面的函数过程: Private Function fun(n As Integer)As Long Dim p As Long p=1 For k=n-1To2Step-1 p=p*k Next k fun=p En
admin
2016-09-19
41
问题
某人为计算n!(0<n<=12)编写了下面的函数过程:
Private Function fun(n As Integer)As Long
Dim p As Long
p=1
For k=n-1To2Step-1
p=p*k
Next k
fun=p
End Function
在调试时发现该函数过程产生的结果是错误的,程序需要修改。下面的修改方案中有3种是正确的,错误的方案是
选项
A、把p=1改为p=n
B、把For k=n-1To2Step-1改为For k=1To n-1
C、把For k=n-1To2Step-1改为For k=1To n
D、把For k=n-1To2Step-1改为For k=2To n
答案
B
解析
奉题考查的考点是有关循环次数的。本题题干中程序的错误在于,p的值是从1-直乘到n-1的值,也就是n-1的阶乘。选项A可以在这个基础上再乘n就得到n的阶乘;选项C和D都能够保证从1乘到n,只有选项B是错误的。
转载请注明原文地址:https://www.kaotiyun.com/show/xOLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
语句X=X+1的正确含义是()。
下面的程序执行时,可以从键盘输入一个正整数,然后把该数的每位数字按逆序输出。例如:输入7685,则输出5867;输入1000,则输出0001。请填空。PrivateSubCommandl_Click()
下面的程序代码执行之后,输出如下结果,请填写空白处将程序补充完整:PrivateSubCommandl_Click()Dimx(3,3)Fori=1To3Forj=1To3
窗体上有Text1、Text2两个文本框及一个命令按钮Commandl,编写下列程序:DimyAsIntegerPrivateSubCommandl_Click()DimxAsInteger
关系数据库管理系统能实现的专门关系运算包括()。
在窗体上有一个名称为Drivel的驱动器列表框,一个名称为Dirl的目录列表框,一个名称为Filel的文件列表框,两个名称分别为Labell、Label2的标签(标题分别为空白和“共有文件”)。要使得驱动器列表框与目录列表框、目录列表框与文件列表框同步变化
下面叙述不正确的是()。
数据库系统在其内部具有3级模式,用来描述数据库中全体数据的全局逻辑结构和特性的是()。
数据结构作为计算机的一门学科,主要研究数据的逻辑结构、对各种数据结构进行的运算,以及()
软件测试是保证软件质量的重要手段,首要任务是______。
随机试题
相对于锥形式组织结构,扁平式组织结构不具备的优点是()
药品不良反应监测管理办法适用于:
红外激光片(IR型)的吸收光谱峰值为
(2010年考试真题)下列各项中,不属于财务管理经济环境构成要素的是()。
匈奴族在陕西省建立过的国家政权有()。
把同一排6张座位编号为1,2,3,4,5,6的电影票全部分给4个人,每人至少分1张.至多分2张,且这两张票具有连续的编号,那么不同的分法种数是:
ThereisgrowinginterestinEastJapanRailwayCo.ltd.,oneofthesixcompanies,createdoutoftheprivatizednationalrail
Thearrivalofthemass-producedcar,justoveracenturyago,causeda(n)【C1】______ofbusinesscreation.Firstcamethemakers
Acompletelynewsituationislikelyto________whentheschoolleavingageisraisedto16.
Residentscouldbeforcedtorisefrombedandputouttheirbinsat5amunderproposalstokeepstreetstidier.Theywouldonl
最新回复
(
0
)