下面程序在调试时出现了死循环 Private Sub Commandl_Click() n=InputBox(“请输入一个整数”) Do Ifn Mod 2=0 Then n=n+1 Else n=n+2 End If

admin2019-06-11 52

问题下面程序在调试时出现了死循环
Private Sub Commandl_Click()
n=InputBox(“请输入一个整数”)
Do
Ifn Mod 2=0 Then
n=n+1
Else
n=n+2
End If
Loop Until n=1000
End Sub

选项 A、只有输入的n是偶数时才会出现死循环，否则不会
B、只有输入的n是奇数时才会出现死循环，否则不会
C、只有输入的n是大于1000的整数时才会出现死循环，否则不会
D、输入任何整数都会出现死循环

答案D

解析本题考查循环。如果输入的n是偶数，那么在循环体中执行n=n+1，偶数+1是奇数，循环结束条件Loop Until n=1000不会满足，形成死循环；如果输入的n是奇数，那么循环体内执行n=n+2，奇数+2依然是奇数，循环结束条件永远不会满足，也形成死循环。

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

二级VB

相关试题推荐

随机试题

最新回复(0)