首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
为计算an的值,某人编写了函数power如下: Private Function power(a As Integer,n As Integer)As Long Dim s As Long p=a For k=1 To n p=p*a Next
为计算an的值,某人编写了函数power如下: Private Function power(a As Integer,n As Integer)As Long Dim s As Long p=a For k=1 To n p=p*a Next
admin
2020-06-30
76
问题
为计算an的值,某人编写了函数power如下:
Private Function power(a As Integer,n As Integer)As Long
Dim s As Long
p=a
For k=1 To n
p=p*a
Next k
power=p
End Function
在调试时发现是错误的,例如Print power(5,4)的输出应该是625,但实际输出是3125。程序需要修改。下面的修改方案中有3个是正确的,错误的一个是( )。
选项
A、把 For k=1 To n 改为 For k=2 To n
B、把 p=p * a 改为 p=p ^ n
C、把 For k=1 To n 改为 For k=1 To n-1
D、把 p=a 改为 p=1
答案
B
解析
程序中计算an的算法有误,由于已经将a的值赋给了p,在后边的For循环中再乘n次a显然就多乘了一次a,因此,要改正此程序或者将p=a改为p=1,或者将for k=1 to n 改成for k=1 to n-1或for k=2 to n。而B选项将p=p*a改为p=p^n将会导致p=p^n执行n次,得不到正确结果。
转载请注明原文地址:https://www.kaotiyun.com/show/pLHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在考生文件夹下有一个工程文件sjt3.vbp,其功能是:①单击“读数据”按钮,则把考生文件夹下in3.dat文件中的100个正整数读入数组a中;②单击“统计”按钮,则找出这100个正整数中的所有完全平方数(一个整数若是另外一个整数的平方,那么它就是完全平方
(1)在名称为Form1的窗体中画一个名称为lblClock的标签,其标题为“0”,BorderStyle属性为1;再添加一个名称为tmrClock的计时器。请设置适当的控件属性,并编写适当的事件过程,使得在运行时,每隔一秒钟标签中的数字加1。如图1-3
以下关于框架的叙述中,错误的是
向文本框中输入字符时,下面能够被触发的事件是
关于随机文件,以下叙述中错误的是
为了对多个控件执行操作,必须选中这些控件。下列不能选中多个控件的操作是
长整型常数的类型说明符为
在标准模块中,将a定义为全局整型变量的语句是
语句Dima(-3To4,3To6)AsInteger定义的数组的元素个数是
一棵二叉树的前序遍历结果是ABCEDF,中序遍历结果是CBAEDF,则其后序遍历的结果是()。
随机试题
甲公司有关投资业务资料如下,假定各方盈余公积计提的比例均为10%。有关资料如下:(1)2011年7月1日,甲公司以银行存款15000万元从其他股东处购买了乙公司20%的股权。甲公司与乙公司的原股东在交易前不存在任何关联方关系,当日乙公司可辨认净资产的公允
下列关于牵张反射的叙述,错误的是
气胸叩诊时呈()
将氯气通入石灰中而制成的混合物为
实木复合地板面层铺设时,相邻板材接头位置应错开不小于()mm距离。
首席风险官对于侵害客户和期货公司合法权益的指令或者授意应当予以拒绝;必要时,应当及时向()报告。
资料一东方公司是国内一家以彩电为主的大型家电生产企业。进入21世纪后,随着中国加入WTO,国外家电企业开始了第二轮对华投资热潮,抢夺彩电产业高端市场。国产彩电企业面临竞争白热化及核心技术缺失、利润空间缩小,国内市场饱和的压力。东方公司开始把目光转向
Patienceisofgreatimportanceinourdailylife.OnceIwaitedabustocomeatastop.30minutespast,butnobuscame.Both
已知线性方程组的通解为[2,1,0,1]T+k[1,-1,2,0]T.记αj=[a1j,a2j,a3j,a4j]T,j=1,2,…,5.问:α4能否由α1,α2,α3线性表出,说明理由.
Forthousandsofyears,peoplethoughtofglassassomethingbeautifultolookat.Onlyrecentlyhavetheycometothinkofita
最新回复
(
0
)