运行下列程序,结果是( )。 Private Sub Command1_Click() f0=1:f1=1:k=1 Do While k<=5 f=f0+f1 f0=f1 f1=f k=k+1

admin2020-06-06  30

问题 运行下列程序,结果是(    )。
    Private Sub Command1_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/nrQ0FFFM
0

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