下面程序能否自终止的 （填能或否）。y=x;whilexnot0do;x=x–1;end;y=y–1;whileynot0do;y=y–1;end;
举一反三
- 下面程序段中正确的是( )。 A: If x＜0 Then y=0 If x＜1 Then y=1 If x＜2 Then y=2 If x＞=2 Then y=3 B: If x＞=2 Then y=3 If x＞1 Then y=2 If x＞=0Then y=1 If x＞0 Then y=0 C: If x＜0 Then y=0 Else If＞=0Then y=1 Else y=3 End If D: If x＞=2 Then y=3 Else If＞=1 Then y=2 Else y=0 End If
- 【单选题】分段函数: ,下面程序段中正确的是__________。 A. If x < 0 Then y = 0 If x < 1 Then y = 1 If x < 2 Then y = 2 If x >= 2 Then y = 3 B. If x >= 2 Then y = 3 If x >= 1 Then y = 2 If x > 0 Then y = 1 If x < 0 Then y = 0 C. If x < 0 Then y = 0 ElseIf x > 0 Then y = 1 ElseIf x > 1 Then y = 2 Else y = 3 End If D. If x > =2 Then y = 3 ElseIf x > =1 Then y = 2 ElseIf x > =0 Then y = 1 Else y = 0 End If
- 有如下事件程序,运行该程序后输出结果是。 Private Sub Command33_Click() Dim x As Integer, y As Integer x = 1: y = 0 Do Until y <= 25 y = y + x * x x = x + 1 Loop MsgBox "x=" & x & ", y=" & y End Sub
- 编写如下程序： Private Sub Command1_Click() Dim x As Integer, y As Integer x = 1: y = 1 Do y = x * y If y > 10 Then Print x, y Exit Do Else x = x + 3 End If Loop While x <= 10 End Sub 运行程序，输出结果为______
- 中国大学MOOC: 下面的程序执行完后a，b的值分别为______。 Dim x, y, a, b As Integer x = 12 : y = 8 a = 1 : b = x * y Do While x Mod 2 = 0 And y Mod 2 = 0 x = x 2 y = y 2 a = a * 2 Loop Do While x <> y If x > y Then x = x - y Else y = y - x End If Loop a = a * x b = b a