为计算1+2+2<sup>2</sup>+2<sup>3</sup>+2<sup>4</sup>+…+2<sup>10</sup>。的值,并把结果显示在文本框Textl中,若编写如下事件过程: Private Sub Commandl Click(

admin2020-02-27  3

问题 为计算1+2+2<sup>2</sup>+2<sup>3</sup>+2<sup>4</sup>+…+2<sup>10</sup>。的值,并把结果显示在文本框Textl中,若编写如下事件过程:
Private Sub Commandl Click(     )
Dim a%,b%,i%
s=1
a=2
For i=2 To 10
a=a*2
b=b+a
Next i
Textl.Text=b
End Sub
执行此事件过程后发现结果是错误的,为能够得到正确结果,应做的修改是(     )。

选项 A、把b=1改为b=0
B、把For k=2 To 10改为For i=1 To 10
C、交换语句b=b+a和a=a*2的顺序
D、同时进行B、C两种修改

答案D

解析 事件过程原代码计算的是:1+2<sup>2</sup>+2<sup>3</sup>+2<sup>4</sup>+…+2<sup>10</sup>。共10个数的值,其中缺少一项,即数2。为此应将循环次数由9次修改为10次,即For i=1 To 10,但同时需交换语句b=b+a和a=a*2的顺序,否则将计算表达式:1+2<sup>2</sup>+2<sup>3</sup>+2<sup>4</sup>+…+2<sup>10</sup>+2<sup>11</sup>的值。
转载请注明原文地址:https://www.kaotiyun.com/show/NXTp777K
0

最新回复(0)