请在下方输入要搜索的题目：

运行下列程序，结果是（）。Public Sub Feb() Dim f0 As Integer, f1 As Integer, k As Integer f0 = 1: f1 = 1: k = 1 Do While k <= 5 f = f0 + f1 f0 = f1 f1 = f k = k + 1 Loop MsgBox "f=" & fEnd Sub

A、f=5;

B、f=13;

C、f=7;

D、f=8

发布时间：2025-08-17 22:58:26

推荐参考答案 ( 由快搜搜题库官方老师解答 )

联系客服

答案：f=13

相关试题

华图在线题库公共基础知识题库遴选题库职称计算机题库消防工程师考试题库护士招聘考试题库社区工作者面试题库书记员考试题库注会试题题库医院考试题库综合素质考试题库及答案医疗考试题库智能题库职业能力测验题库小学体育教师招聘题库执法考试题库公务员考试题库及答案专升本题库社会工作者题库征信考试题库

运行下列程序，结果是（ ）。Public Sub Feb() Dim f0 As Integer, f1 As Integer, k As Integer f0 = 1: f1 = 1: k = 1 Do While k <= 5 f = f0 + f1 f0 = f1 f1 = f k = k + 1 Loop MsgBox "f=" & fEnd Sub