为计算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＝pEnd 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
热度🔥449
参考答案：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次，得不到正确结果。
【解析】程序中计算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次，得不到正确结果。
复制题目向AI提问
扫码免费计算机二级刷题
2025年计算机等级考试题库
推荐
在窗体中有文本框Text1和Text2。运行程序时，在Text1中输入整数m（m>0），单击Command1"运行"按钮，程序能够求出m的全部除1之外的因子，并使用Text2显示结果。例如，18的全部因子有2,3,6,9,18，输出结果为"2,3,6,9,18,"；28的全部因子为2,4,7,14,28，输出结果为"2,4,7,14,28"。
事件代码如下：
Private Sub Command1_Click()
m = Val(Me!Text1)
resule = ""
k = 2
Do
If m Mod k = 0 Then result = result & k & ","
k = k + 1
Loop Until 【 】
Me!Text2 = result
End Sub
程序【 】处应填写的语句是
下列叙述中正确的是（ ）。
在会议开始前，市场部助理小王希望在大屏幕投影上向与会者自动播放本次会议所传递的办公理念，按照如下要求完成该演示文稿的制作： 1. 在考生文件夹下，打开“PPT素材.pptx”文件，将其另存为“PPT.pptx”（“.pptx”为扩展名），之后所有的操作均基于此文件，否则不得分。 2. 将演示文稿中第1页幻灯片的背景图片应用到第2页幻灯片。 3. 将第2页幻灯片中的“信息工作者”、“沟通”、“交付”、“报告”、“发现”5段文字内容转换为“射线循环”SmartArt布局，更改SmartArt的颜色，并设置该SmartArt样式为“强烈效果”。调整其大小，并将其放置在幻灯片页的右侧位置。 4. 为上述SmartArt智能图示设置由幻灯片中心进行“缩放”的进入动画效果，并要求上一动画开始之后自动、逐个展示SmartArt中的文字。 5. 在第5页幻灯片中插入“饼图”图形，用以展示如下沟通方式所占的比例。为饼图添加系列名称和数据标签，调整大小并放于幻灯片适当位置。设置该图表的动画效果为按类别逐个扇区上浮进入效果。 6. 将文档中的所有中文文字字体由“宋体”替换为“微软雅黑”。 7. 为演示文档中的所有幻灯片设置不同的切换效果。 8. 将考试文件夹中的“BackMusic.mid”声音文件作为该演示文档的背景音乐，并要求在幻灯片放映时即开始播放，至演示结束后停止。 9. 为了实现幻灯片可以在展台自动放映，设置每张幻灯片的自动放映时间为10秒钟。
小李正在Excel中编辑一个包含上千人的工资表，他希望在编辑过程中总能看到表明每列数据性质的标题行，最优的操作方法是（ ）。
