下列程序的运行结果为（）。 a = 75 If a ＞ 60 Then i = 1 ElseIf a ＞ 70 Then i = 2 ElseIf a ＞ 80 Then i = 3 ElseIf a ＞ 90 Then i = 4 End If Print "i="; iA．i=1B．i=2C．i=3D．i=4
下列程序的运行结果为（）。 a = 75 If a ＞ 60 Then i = 1 ElseIf a ＞ 70 Then i = 2 ElseIf a ＞ 80 Then i = 3 ElseIf a ＞ 90 Then i = 4 End If Print "i="; i
A．i=1
B．i=2
C．i=3
D．i=4
参考答案和解析
5
相关考题：
阅读程序：Option Base 1Private Sub Form_Click（）Dim a（3）As IntegerPrint "输入的数据是：";For i = 1 To 3a（i）=InputBox（"输入数据"）Print a（i）;NextPrintIf a（1）t = a（1）a（1）= a（2）a（2）= ________End IfIf a（2）a（3）Thenm = a（2）ElseIf a（1）a（3）Thenm = ________Elsem = ________End IfPrint "中间数是：";mEnd Sub程序运行后，单击窗体，在输入对话框中分别输入三个整数，程序将输出三个数中的中间数，如图所示。请填空。
下列程序段的执行结果为( )。 a=95 if a＞60ThenI=1 if a＞70Thenl=2 if a＞80Thenl=3 if a＞90ThenI=4 Print"I="；IA．I=1B．I=2C．I=3D．I=4
（ 7 ）有如下程序段：fer （ int i=1; i=50;i++ ） {if （ i%3 != 0 ）continue;elseif （ i%5!=0 ）continue;touti" ， " ；}执行这个程序段的输出是【 7 】 。
有以下程序： Sub subP(b()As Integer) For i=1 To 4 b(i)＝2*i Next i End Sub Private Sub Command1_Click() Dim a(1 To 4)As Integer a(i)＝5 a(2)＝6 a(3)＝7 a(4)＝8 subP a() For i＝1 To 4 Print a(i) Next i End Sub 运行上面的程序，单击命令按钮，输出结果为______。A． 2 4 6 8B．5 6 7 8C．10 12 14 6D．出错
有以下程序： Sub subP(b()As Integer) For i=1 To 4 b(i)=2*i Next i End Sub Private Sub Command1_Click() Dim a(1 To 4)As Integer a(1)=5 a(2)=6 a(3)=7 a(4)=8 subPa() For i=1 To 4 Print a(i) Next i End Sub 运行上面的程序，单击命令按钮，输出结果为( )A．2 4 6 8B．5 6 7 8C．10 12 14 16D．出错
（22）下列程序段的执行结果是。 a=75 If a60 Then i=1 If a70 Then i=2 If a80 Then i=3 If a90 Then i=4 Print"i"；iA.i=1 B.i=2 C.i=3 D.0i=4
阅读程序： Sub p( b () As Integer)For i =1To 4 b(i) = 2(iNext i End Sub Private Sub Command1_Click()Dim a (1 To 4) As Integer a(1)=5 a(2)=6 a(3)=7 a(4)=8 call p (a) For i=1 To 4 Print a(i) Next iEnd Sub运行上面的程序，单击命令按钮，输出结果为。
阅读下列程序： Function func(n As Integer)As Integer Sum = 0 For i = 1 To n Sum = Sum + (i + 1)* i Next i func = Sum End Function.Private Sub Command1_Click () Dim a As Integer a= 5 s = func (A)Print s End Sub 程序运行后，单击命令按钮，输出的结果为A．80B．60C．70D．15
下列程序段的执行结果为a=95If a60 Then I=lIf a70 Then l=2If a80 Then I=3If a90 Then I=4Print"I=":IA．I=1B．I=2C．I=3D．I=4
在窗体中添加一个名称为Command1的命令按钮，然后编写如下事件代码： Private Sub Command1_CliCk() A=75 If A＞60 Then I=1 If A＞70 Then I=2 If A＞80 Then I=3 If A＞90 Then I=4 MsgBox I End Sub 窗体打开运行后，单击命令按钮，则消息框的输出结果是______。A．1B．2C．3D．4
有如下程序段：for(int i=1；i=50；i++){if(i％3 1=0)continue；elseif(i％5 1=0)continue；couti”，”；}执行这个程序段的输出是【 】。
下列程序的运行结果是______。main(){int a[6],i; for(i=2;i3))%5; print 下列程序的运行结果是______。 main() { int a[6],i； for(i=2;i＜6;i++) {a[i]=4*(i-2*(i＞3))%5； printf("%2d",a[i])； } }A．2 3 2 3B．1 2 1 2C．3 2 3 2D．2 2 2 2
下列程序段的执行结果为( )。 a=75 If a＞60 Then i=1 If a＞70 Then i=2 If a＞80 Then i=3 If a＜90 Then i=4 Print "i="；iA．i=1B．i=2C．i=3D．i=4
下列程序段的运行结果是( )。 Subsele() Dim n As Integer i=21:n=3 Do While i＞n i=i-n Loop Print i End SubA．2B．4C．5D．3
下列程序的执行结果是( )。 a=75 If a＞90 Then i=4 If a＞80 Then i=3 If a＞70 Then i=2 1f a＞60 Then i=1 Print "i="；iA．i=1B．i=2C．i=3D．i=4
下列程序段的执行结果是( )。 a=75 Ifa＞60 Then i=1 Ifa＞70 Then i=2 Ifa＞80 Then i=3 Ifa＜90 Then i=4 Print"i=";iA．i=1B．i=2C．i=3D．i=4
下列程序段的运行结果是( )。 Sub sele() Dim n As Integer i=21: n=3 Do While i ＞ n i=i-n Loop Print i End SubA．2B．4C．5D．3
有程序如下: Sub subP(b() As Integer) For i=1 To 4 b(i)=2*i Next i End Sub Private Sub Command1_Click() Dim a(1 To 4) As Integer a(1)=5 a(2)=6 a(3)=7 a(4)=8 subP a() For i=1 To 4 Print a(i) Next i End Sub运行上面程序，单击命令按钮，输出结果为______ 。A． 2 4 6 8B．5 2 2 2C．10 12 14 16D．出错
下列程序的执行结果是(， )。 a=75 1f a＞90 Then i=4 1f a＞80 Then i=3 1f a＞70 Then i=2 1f a＞60 Then i=1 Print”i=”；iA．i=1B．i=2C．i=3D．i=4
下列函数的运行结果是()。includeintf(int a, int b){ int c;if(a>b)c=1;elseif(a== 下列函数的运行结果是( )。 #include＜iostream.h＞ intf( int a， int b) { int c； if(a＞b) c=1； elseif(a==b)C=0； elsec=-1； return(c)；} void main() {int i=2，j=3； int p=f(i，j)； cout＜＜p；}A．-1B．1C．2D．编译出错，无法运行
下列程序段的执行结果为 a=75 If a60 Then I=1 If a70 Then I=2 If a80 Then I=3 If a90 Then I=4 Print "I="；IA．I=1B．I=2C．I=3D．I=4
阅读下列程序： Private Sub Form Click() Dim i As Integer， sum As Integer For i = 2 To 10 If i Mod 2 ＜＞ 0 Then Print i； Else sum = sum + i End If Next i Print sum End Sub 程序运行后，单击窗体，在窗体上的输出结果是A．3 5 7 9 30B．1 3 5 7 9C．2 4 6 8 20D．11 15 17 19 20
下面程序段的运行结果是( )。 Private Sub Form_Click() For I=3 to 1 step-1 Print Spc(10-I)； For j=1 to 2*I-1 print"*"; Next j Print Next I End SubA．***** *** *B．* *** *****C． * *** *****D． * *** *****
阅读程序： Sub subP(b()As Integer) For i=1 To 4 b(i)=2*i Next i End Sub Private Sub Command1_Click() Dim a(1 To 4)As Integer a (1)=5 a (2)=6 a (3)=7 a (4)=8 subP a() For i=1 To 4 Print a(i) Next i End Sub运行以上程序，单击命令按钮，输出结果为______ 。A．2 4 6 8B．5 6 7 8C．10 12 14 16D．出错
下列程序的执行结果是( )。 a =75 If a ＞ 90 Then i=4 If a ＞ 80 Then i=3 If a ＞ 70 Then i=2 If a ＞ 60 Then i=1 Print "i="; iA．i=1B．i=2C．i=3D．i=4
以下程序段的输出结果是（） int a[7]={9，15，7，-3，0，11，15}，m，n，i；for（m=n=0，i=1；i7；i++） if（a[i]a[m]）m=i； elseif（a[i]printf（"%d，%d/n"，m，n）A、15，-3B、6，3C、1，3D、2，4
单选题以下程序段的输出结果是（） int a[7]={9，15，7，-3，0，11，15}，m，n，i；for（m=n=0，i=1；ia[m]）m=i； elseif（a[i]printf（"%d，%d/n"，m，n）A15，-3B6，3C1，3D2，4
填空题下列程序运行结果为（）。 Program main Implicit none Integer：：floor=5，i Do i=1， floor If（i==3）cycle If（i==4）cycle Write（*，*）i End do end