2. 计算机
  3. 为计算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

admin2015-08-28  45
问题 为计算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://kaotiyun.com/show/HbLp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)