运行下列程序,结果是(  )。 Private Sub Command32_Click()   f0 = 1 : f1 = 1 : k = 1   Do While k

admin2021-04-27  26

问题 运行下列程序,结果是(  )。
Private Sub Command32_Click()
  f0 = 1 : f1 = 1 : k = 1
  Do While k <= 5
    f = f0 + f1
    f0 = f1
    f1 = f
    k = k + 1
  Loop
MsgBox "f = " & f
End Sub

选项 A、f = 5
B、f = 7
C、f = 8
D、f = 13

答案D

解析 题考察Do循环语句:
k=1时,f=1+1=2,f0=1,f1=2,k=1+1=2;
k=2时,f=3,f0=2,f1=3,k=2+1=3;
k=3时,f=5,f0=3,f1=5,k=3+1=4;
k=4时,f=8,f0=5,f1=8,k=4+1=5;
k=5时,f=13,f0=8,f1=13,k=6,不再满足循环条件跳出循环,此时f=13。
转载请注明原文地址:https://jikaoti.com/ti/JQC0FFFM
0

随机试题
最新回复(0)