[单项选择题] 下列程序的运行结果是( )。 Private Function myfun(m,n) Do While m>n Do While m>n:m=m-n:Loop Do While n>m:n=n-m:Loop Loop my fun=m End Function Private Sub Command1_Click() Print myfun(9,8) End Sub

A．2
B．1
C．4
D．3

参考答案： B

● 参考解析

求解本题的关键在于理解好3个DoWhile循环的执行顺序，第2个和第3个DoWhile循环嵌套在第1个DoWhile循环内，先执行第2个循环，然后是第3个循环，最后是外层循环即第1个DoWhile循环。程序执行过程是：m=9，n=8；第1个DoWhile循环内，执行第2个DoWhile循环，m=m-n=1；退出第2个DoWhile循环；执行第3个DoWhile循环，n=n-m，最后n的值为1；退出第3个DoWhile循环；退出第1个DoWhile循环。程序执行结果是1。

相关题目:

[填空题] 软件开发环境是全面支持软件开发全过程的【4】集合。
[填空题] 关系模型的完整性规则是对关系的某种约束条件，包括实体完整性、【5】和自定义完整性。
[填空题] 软件工程的出现是由于【2】。
[填空题] 软件结构是以【3】为基础而组成的一种控制层次结构。
[填空题] 算法的基本特征是可行性、确定性、【1】和拥有足够的情报。

微信端

推荐题目

● [填空题] 建立随机文件TEST．DAT，存...
● [单项选择题] 设有如下通用过程： ...
● [问答题] 在名称为Form1的窗体中...
● [填空题] 数据的独立性分为逻辑...
● [填空题] 在深度为7的满二叉树中...
● [填空题] 在Visual Basic中，将一...
● [填空题] 下面程序用来计算： ...
● [单项选择题] 关系模型允许定义3...

当前位置：IT认证＞BASIC题库

[单项选择题] 下列程序的运行结果是( )。 Private Function myfun(m,n) Do While m&gt;n Do While m&gt;n:m=m-n:Loop Do While n&gt;m:n=n-m:Loop Loop my fun=m End Function Private Sub Command1_Click() Print myfun(9,8) End Sub

相关题目:

[单项选择题] 下列程序的运行结果是( )。 Private Function myfun(m,n) Do While m>n Do While m>n:m=m-n:Loop Do While n>m:n=n-m:Loop Loop my fun=m End Function Private Sub Command1_Click() Print myfun(9,8) End Sub