【正文】
。(亮燈為0,關(guān)閉為1)為了實現(xiàn)這一目標,完善下列程序,使之能完成該功能。 s=0 For i=1 To 10 t=1 for j=1 to it=t*j next j s=s+t Next i A、s=1+2+3+4+5+6+7+8+9+10 B、s=1*2*3*4*5*6*7*8*9*10 C、s=1!+2!+3!+4!+5!+6!+7!+8!+9!+10! D、s=1+2*3+3*4+4*5+5*6+6*7+7*8+8*9+9*10閱讀下面程序:Private Sub mand1_click() a=val()b=val()if a=b then =str(a) exit subend ifdo while b0 r=a mod b a=b b=rloop=str(a) End Sub在texttext2中輸入6,則text3中的值為( )。① a(0) = 1 39。A、1 B、1 C、False D、True1隨機產(chǎn)生10個[10,99]中的整數(shù),依次存儲到數(shù)組變量a(1)~a(10)中。 A、②①④③ B、①②③④ C、④②③① D、①④②③計算梯形面積的算法描述如下:①輸入上底a、下底b和高h②計算梯形面積s(計算公式為:s=(a+b)*h/2)③輸出結(jié)果④結(jié)束上述算法屬于( )。在Visual Basic中,下列存儲成績數(shù)據(jù)的變量定義最合適的是( )。請在下面的①和②(對應(yīng)流程圖中相應(yīng)空缺位置)填入相應(yīng)選項。④ A、① B、② C、③ D、④2在Visual Basic中,有如下程序:Private Sub Command1_Click() Dim a As Integer, b As Integer, c As Integer Dim d As Integer, z As Integer a = Val(): b = Val(): c = Val() d = max(a, b) z = max(d, c) = Str(d) = Str(z)End SubFunction max(x As Integer, y As Integer) As Integer If x y Then max = x Else max = yEnd Function運行該程序,在文本框Text文本框Text文本框Text3中分別輸入6后,單擊命令按鈕Command1,文本框Text5中顯示的是( )。 (2)變量c的值為____________。界面如圖所示,在文本框Text1中輸入數(shù)制k,在文本框Text2中輸入數(shù)x,單擊轉(zhuǎn)換按鈕(Command1)后,在標簽Label4中輸出轉(zhuǎn)換的結(jié)果。 (2)程序中②劃線處應(yīng)填入___________________。3(本題4分,每空2分)設(shè)有n盞燈,放在一排。S=0 :T=1For i=1 to 100S=s+i*TT=TNext i①S=0 For i=1 to 100S=s+i*(1)^(i+1)Next i②S=0For i=1 to 100S=s+i*(1)^iNext i③S=0:S1=0:S2=0For i=1 to 50S1=s1+2*i1S2=s2+2*iNext iS=s1s2④A、① B、② C、③ D、④2下列語句執(zhí)行后,s的值為( )。A、M=M*2+1 D=1 B、M=M*2+1 D1 C、M=2*(M+1) D=1 D、M=2*(M+1) D12有如下Visual Basic程序段:a = 3b = 9c = a + bIf c = 12 Then py = 正確 Else py = 不正確分析該程序段,下列說法正確的是( )。A、123 B、45 C、12 D、51如下數(shù)組聲明語句:Dim a(3,2 To 2,5) ,則數(shù)組a包含的元素的個數(shù)為( )。A、唯一性 B、有窮性 C、能行性 D、有輸出做勻加速直線運動物體的即時速度計算公式是vt = v0 + at,其中v0是初速度,a是加速度,t是時間。A、14 B、5 C、1 D、41設(shè)x是正數(shù),下列能用于描述x是否為偶數(shù)的Visual Basic條件表達式是( )。發(fā)生