运行下列程序，结果是( )。 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

admin2019-05-23 61

问题运行下列程序，结果是( )。
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，n=5，k=3+1=4；
k=4时，f=8，f0=5，n=8，k=4+1=5；
k=5时，f=13，f0=8，f1=13，k=6，不再满足循环条件即跳出循环，此时f=13。

转载请注明原文地址:https://kaotiyun.com/show/eR0p777K

本试题收录于：二级Access题库NCRE全国计算机二级分类