下列程序a = 2 if a<4: print（1) if a<2: print（2) else: print（3) else: print（4)会输出几个值（）。

Private Sub Command1_Click（） a=Val（InputBox（"请输入a的值="）） b=Val（InputBox（"请输入a的值="）） x=a+b Ifa＞b Then x=a-b End If Print x End Sub 若运行时从键盘输入a和b分别为3和4，则程序输出的结果为（）

若a的值为3时，下列程序段被执行后，c的值为（）。c=1;If (a>0)If (a>3)c=2;elsec=3;elsec=4;

运行下面程序，如果输入80，则输出结果是_____。 Dim a As Integer, i As Integer a = InputBox(input a:) 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=

下列程序的输出结果是 _______ 。 main() { int a=5,b=4,c=3,d=2; if(a>b>c) printf(\%d\\n\,d); else if((c-1>=d)==1) printf(\%d\\n\,d+1); else printf(\%d\\n\,d+2); }

下列程序段的运行结果为（ ）。 Dim a Dim s%, i% a = Array(1, 2, 3, 4, 5) For i = 1 To 3 s = s + a(i) ^ 2 Next i Print s

若有以下程序#includevoid main(){ int a=1,b=2,c=3,d=4;if ((a=2) && (b=1)) c=2;if ((c==3) || (d=-1)) a=5;printf('%d,%d,%d,%d ', a,b,c,d);}则程序的输出结果是______。

下列程序段的执行结果为（)。a=100:b=50 If a＞b Then a=a-b else b=b+a End if Print a

已知数列0，1，1，2，3，5，8，13……(从第3项起每一项为其前2项之和)，以下程序用于求数列的第20项，请将程序补充完整。 A=0 B=1 N=210 N=N+1 IF N.LE.20 THEN C=______ A=B B=C GOTO 10 ENDIF PRINT*,C END 答案是()。

运行下方代码段，若三次输入的数字分别是：5,3,4，则输出的是（）。while True:a = int（input（））if a % 2 == 0:breakelse:print（a * 2）

若a的值为3时，下列程序段被执行后，c的值是（)。intc=1;if（a＞0)if（a＞3)c=2;elsec=3;elsec-4;A．1B．2C

3、下列程序的输出结果是？ a = [1, 2, 3] print a * 2

50、执行以下程序，输出结果为： lst=[（'1001','a'), （'1002','b'), （'2001','c')] for k,v in lst: if k[-1]=='2': break print（v)

2、写出程序运行结果（) c=166 b=0 a=-120 if（a＜200 or c＞=100): b=b+100 print（b)

有如下程序： a$="122345876" d$=Left$（a$，1) For i=2 To Len（a$); z$=Mid$（a$，i，1)If z$＞d$ Then d$=z$ Next i Print d$ 运行后，输出的结果是______。

5、有以下程序段： INTEGER A（5),T DATA A/1，2，3，4，5/ DO I=1，2 T=A（I) A（I)=A（6-I) A（6-I)=T ENDDO PRINT*, A（5) END 执行以上程序后，输出的A（5)的值为：

2、下列程序的输出结果是？ def f（l): l[1] = [5] return l a = [1, 2, 3] f（a) print a[1]

执行以下程序段后，窗体显示的内容为（） a = 75 If a >= 60 Then k = k + 4 ElseIf a >= 70 Then k = k + 3 ElseIf a >= 80 Then k = k + 2 ElseIf a >= 90 Then k = k + 1 End If Form1.Print "k=", kEnd Sub

下面程序a=1 b=2 if a>1 else 3 print （a+b)输出的结果是

以下程序的输出结果是（提示：ord（“a”）==97）List_demo = [1,2,3,4,5,’a’,’b’]Print（list_demo[1],list_demo[5]）

若a的值为3时，下列程序段被执行后，c的值是多少？（） c = 1; if （a＞0 ) if （a＞3 ) c = 2; else c = 3; else c = 4;

阅读程序： Option Base 1 Private Sub Form_Click（) Dima（3)As Integer Print"输入的数据是:"； Fori=1 To 3 a（i)=InputBox（“输入数据”) Printa（i)； Next Print If a（1)＜a（2) Then t=a（1) a（1)=a（2) a（2)= [10] End If Ifa（2)＞a（3)T

以下程序用Array（)函数建立了含有10个元素的数组，然后找出并输出了其中的最大值和最小值。 Option Base 1 Private Sub Form_Click（) Dim a Dim max As Integer, min As Integer, i As Integer a = Array（13, 17, -11, 4, 8, 10, 20, -9, 15, 21) max = a（1) min =______（1)______ For i = 2 To 10 If a（i) ＞ max Then ______（2)______ End If If a（i) ＜ min Then ______（3)______ End If Next i Print max, min End Sub

下列程序段的执行结果为 Dim A（3，3) For M=1 To 3 For N=1 To 3 If N=M Or N=3-M+1 Then A（M,N) =1 Else A（M,N) =0 End If Next N Next M For M=1 To 3 For N=1 To 3 Print A（M,N) Next N Print Next M Ａ) 1 0 0 0 1 00 0 0 Ｂ)

阅读程序： Option Base1 Private Sub Form_Click（) Dim a（3)As Integer Print“输入的数据是：”； For i＝1 To 3 a（i)=InputBox（“输人数据”) Print a（i)； Next Print If a（1) t=a（1) a（1)=a（2) a（2)=【8】 End If If a（2)>a（3) Then m=a