举一反三
- 【单选题】分段函数: ,下面程序段中正确的是__________。 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
- 下面程序段中正确的是( )。 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
- 以下程序运行后的输出结果是 ______。 Sub add(x，y) x=x+y Print "x="；x；"，y="；y End Sub Private Sub Command1_Click() x=1 y=1 Call add((x)，(y)) Print"x="; x；"，y="；y End Sub A: x=1，y=1 B: x=2，y=2 C: x=2，y=1 D: x=1，y=1 E: x=1，y＝1 F: x=1，y=1 G: x=2，y=1 H: x=2，y=1
- 当输入4时,以下程序的输出结果是. Private Sub Command1_Click() x = Val(InputBox(x)) If x ^ 2 < 15 Then y = 1 / x If x ^ 2 > 15 Then y = x ^ 2 + 1 Print 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 运行程序，输出结果为______
内容
- 0
如下程序的运行结果是（ ） intx=1,y=1;if(x==1) y=x+1;elseif(y==2) x=y+1;else y=0; A: x=1, y=2 B: x=3, y=2 C: x=3, y=0 D: x=1, y=0
- 1
分段函数：[img=206x91]18037123bea18f3.png[/img],下面程序段中正确的是__________。 A: If x < 0 Then y = 0If x < 1 Then y = 1If x < 2 Then y = 2If x >= 2 Then y = 3 B: If x > =2 Then y = 3ElseIf x > =1 Then y = 2ElseIf x > =0 Then y = 1Else y = 0End If C: If x >= 2 Then y = 3If x >= 1 Then y = 2If x > 0 Then y = 1If x < 0 Then y = 0 D: If x < 0 Then y = 0ElseIf x > 0 Then y = 1ElseIf x > 1 Then y = 2Else y = 3End If E: If x < 0 Then y = 0If 0 <= x <1 Then y = 1If 1 <= x < 2 Then y = 2If x >= 2 Then y = 3
- 2
执行下列事件过程，y的值为。 Private Sub Command1_Click() x = 3 If x > 10 Then y = x ^ 2 + 3 * x + 2 Else If x > 5 Then y = 3 * x + 2 Else y = 5 End If End If End Sub
- 3
在窗体中添加一个命令按钮 Command1 ， 并编写如下程序 ： Private Sub Command1_Click() x = InputBox(x) If x ^ 2 = 9 Then y = x If x ^ 2 < 9 Then y = 1 / x If x ^ 2 > 9 Then y = x ^ 2 + 1 Print y End Sub 程序运行时，单击命令按钮，在 InputBox 中输入 3 ，然后单击“确定”按钮，程序的运行结果为（ ）。
- 4
分段函数：[img=203x91]17de5f2f296a7ac.jpg[/img],下面程序段中正确表达的是 。 A: If x >; =2 Then y = 3ElseIf x >; =1 Then y = 2ElseIf x >; =0 Then y = 1Else y = 0End If B: If x <; 0 Then y = 0If x <; 1 Then y = 1If x <; 2 Then y = 2If x >;= 2 Then y = 3 C: If x >;= 2 Then y = 3If x >;= 1 Then y = 2If x >; 0 Then y = 1If x <; 0 Then y = 0 D: If x <; 0 Then y = 0ElseIf x >; 0 Then y = 1ElseIf x >; 1 Then y = 2Else y = 3End If E: If x <; 0 Then y = 0If 0 <;= x <;1 Then y = 1If 1 <;= x <; 2 Then y = 2If x >;= 2 Then y = 3