设有如下事件过程: Private Sub Form_Click() Dim f1 As Integer, f2 As Integer, i As Integer Dim s As Integer f1 = 1: f2 = 1 s = f1

admin2015-06-30  22

问题 设有如下事件过程:
Private Sub Form_Click()
  Dim f1 As Integer, f2 As Integer, i As Integer
  Dim s As Integer
  f1 = 1: f2 = 1
  s = f1 + f2
  For i = 1 To 3
    f1 = f1 + f2
    f2 = f2 + f1
    s = s + f1 + f2
  Next i
  Print s
End Sub
运行程序,单击窗体,则输出结果为

选项 A、2
B、20
C、54
D、52

答案C

解析 程序开始执行时,f1=1,f2=1,s=f1+f2=2。For循环变量i的取值从1到3,当i=1时,f1=f1+f2=2,f2=f2+f1=1+2=3,s=s+f1+f2=2+2+3=7;当i=2时,f1=f1+f2=2+3=5,f2=f2+f1=3+5=8,s=s+f1+f2=7+5+8=20;当i=3时,f1=f1+f2=5+8=13,f2=f2+f1=8+13=21,s=s+f1+f2=20+13+21=54;故本题正确答案为C。
转载请注明原文地址:https://jikaoti.com/ti/eA60FFFM
0

随机试题
最新回复(0)