【正文】
F = F * INext IPrint F(A)2 (B)4 (C)6 (D)8 ( 70 Wend80 Print N(A) N (B)= N (C) N / 2 (D)= N / 2 ( PRINT (I / (I MOD 3))。 ) ,共輸出幾個 ♀?For i = 1 To 20 If i Mod 2 = 0 Then Print ♀Next I(A)2 (B)4 (C)5 (D)10 ( ) Basic(VB)程式語言執(zhí)行以下程式碼後,則螢幕輸出之資料為何?t = 0S = 1While S = 3 S = S + 1 t = t + S * (S 1)Wendt = t + SPrint t(A)18 (B)22 (C)24 (D)25 ( ) ,那一項是錯誤的(A)FORNEXT敘述必須是成對的出現(xiàn)在程式中,即所欲被重複執(zhí)行的程式片斷,必須被FORNEXT敘述包括起來 (B)增值一定要是正數(shù) (C)初值和終值無正負的限制 (D)FORNEXT所建立的迴圈,有可能執(zhí)行次數(shù)為零次 ( ) ,請問S =?Dim S As IntegerDim I, J As IntegerS = 0For I = 1 to 5 For J = I to 1 step 2 S = S + 1 Next JNext I(A)9 (B)8 (C)7 (D)6 ( ) Basic語言片段程式執(zhí)行後,何者正確?sum1 = 0sum2 = 0k = 0Do While (k 10) sum1 = sum1 + 1 sum2 = sum2 + k k = k + 3Loop(A)sum1 = 4 (B)sum1 = 10 (C)sum2 = 19 (D)sum2 = 55 ( ) ?Private Sub Form_Activate( ) n = 5 Call f1(n)End SubSub f1(n) a = 1 For I = 1 To n a = a * I Next I Print aEnd Sub(A)120 (B)15 (C)60 (D)20 ( ) ?(A)隨機 (B)循序 (C)重複 (D)選擇 ( ) Basic程式後,輸出結果為下列何者?Private Sub Form_Activate( ) Dim x As Integer, y As Integer, z As Integer x = 1: y = 2: z = 3 Call God(x, x, z) Print x。 ) Basic程式片段的執(zhí)行結果為何?s = 0: c = 1While c 5 For i = 1 To c s = s + 1 Next i c = c + 1Wend Print s(A)4 (B)7 (C)9 (D)10 ( ) Basic語言片段程式的執(zhí)行結果為何?N = 0For I = 1 To 50 If I Mod 15 = 0 Then N = N +1 End If Next I Print N = N(A)N = 2 (B)N = 3 (C)N = 4 (D)N = 5 ( ) Basic 程式,印出的結果為:X = 102Y = 40For J = 2 To 4 Do While X Y If X Y Then X = X Y Else Y = Y X End If X = X J LoopNext JPrint X(A)8 (B)6 (C)2 (D)0 ( ) FOR X = 3 TO 5 FOR Y = X TO 8 STEP 3 PRINT * NEXT YNEXT X(A)*** (B)**** (C)***** (D)****** ( ) (1 * 2) (2 * 3) + (3 * 4) (4 * 5) + (5 * 6) 的值,則空格中要填入什麼內容?T = 0: S = 1 FOR N = 1 TO 5 T = T + S * N * (N + 1) S = ________NEXT N PRINT T END(A)1 + S (B)S 2 (C)N S (D)1 * S ( ) Basic的程式中有一迴圈敘述為「For K=1 To 12 Step 3」,則當離開迴圈時,K的值為何?(A)12 (B)13 (C)14 (D)15 ( ) Basic程式中,請問Do...Loop迴圈會執(zhí)行幾次?total = 0: Counter = 1Do total = total + Counter Counter = Counter + 1 If total 10 Then Exit DoLoop While Counter = 10(A)20 (B)15 (C)10 (D)5 ( ) ,顯示的結果為何?C = 2For I = 1 To 10 If I Mod 2 = 0 Then C = C + INext IPrint C(A)57 (B)55 (C)32 (D)30 ( ) ?(A)Select Case敘述 (B)While Wend敘述 (C)If敘述 (D)For Next敘述 ( ) ,把較大的數(shù)存放到變數(shù)A,較小的數(shù)存放到變數(shù)B,則空格中應填入的程式碼為何?IF B A THEN ?。撸撸撸撸摺 = A A = HEND IF(A)B = H (B)A = B (C)H = A (D)H = B ( ) Basic程式片段,出現(xiàn)提示符號時輸入數(shù)值10,則輸出列印結果為:a = InputBox(input data)b = a Mod 2 ^ 3If a b Then Print a + bIf a b Then Print a b(A)0 (B)8 (C)11 (D)18 ( ) (12月)之日期是否合理的程式片段,請問空格處應填入哪一個條件式,才能判斷日期是否合理(假設變數(shù)d儲存日期資料)?If m = 1 Or m = 3 Or m = 5 Or m = 7 Or m = 8 Or m = 10 Or m = 12 Then If _______________________ Then MsgBox (輸入的日期合理) Else MsgBox (輸入的日期不合理) End IfEnd If(A)d = 1 ~ 31 (B)d = 1 And d = 31 (C)d = 31 (D)d = 1 ( ) Basic程式後,輸出的結果為何?x = 10: y = 4If x = 10 And y 6 Then Print HappyEnd IfPrint Birthday (A)HappyBirthday (B)Happy (C)BirthdayHappy (D)Birthday ( ) Basic程式片段,會產生哪一種錯誤的訊息?If a 5 Then a = a + 3ElseIf b 5 Then a = a 5(A)沒有定義變數(shù)的初始值 (B)變數(shù)名稱沒有意義 (C)If條件式中不能使用比較運算子 (D)沒有成對的End If ( ) ~9級的評分標準,級數(shù)愈高表示英語能力愈好。 ) Basic程式片段後,C的值為何?A = 30: B = 15If A B Then C = A BElse C = B AEnd If(A)7 (B)15 (C)30 (D)45 ( ) ,所印出的X值結果為何?X = 0For Y = 1 To 10 Step 2 For Z = 10 To 1 Step 3 If Y = Z Then X = X + 1 End If Next ZNext YPrint X(A)0 (B)2 (C)11 (D)20 ( ) ,如果條件沒設好很容易造成無窮迴圈:(A)重複結構 (B)選擇結構 (C)循序結構 (D)隨機結構 ( ) Basic程式計算出的值,則Do While後面空格中應該填入什麼內容?Private Sub Form_Activate( ) Sum = 0 I = 1 C = 1 Do While ______________ Sum = Sum + C C = (1/2) * C I = I + 1 Loop Print SumEnd Sub(A)I 4 (B)I 5 (C)I 6 (D)I 7 ( ) Basic 語言片段程式的結果為何?P = 1For K = 1 to 4 Step 2 P = P * KNext KPrint P(A)3 (B)4 (C)10 (D)24 ( ) ?S = 0 FOR K = 1 TO 5 FOR J = 1 TO 5 S = S + K + J NEXT J NEXT K PRINT K * J(A)25 (B)10 (C)30 (D)36 ( ) Basic程式片段,ANS最後Print之值為何?Dim ANS As Integer, I As IntegerANS = 0: I = 1 While I 9 For J = 1 TO I ANS = ANS + J Next J I = I + 3 Wend Print ANS = ANS(A)33 (B)36 (C)39 (D)42 ( ) ,顯示的結果為何?10 SUM = 120 FOR I = 1 TO 330 J = I ^ 2 * 240 SUM = 2 * SUM + J50 NEXT I60 PRINT SUM + 2(A)50 (B)51 (C)52 (D)53 ( ) Basic語言片段程式的結果為何?S = 0For K = 1 to 2 For J = 2 to 3 S = S + K * J Next JNext KPrint S(A)10 (B)15 (C)13 (D)20 ( ) Basic 程式片段,執(zhí)行後的結果為何?Dim S As IntegerDim I As IntegerS = 0: I = 0While (I 10) S = S + 1 I = I * 2 + 1WendPrint S(A)4 (B)6 (C)8 (D)10 ( ) Basic程式後,請問x、y值為何?Private Sub Form_Activate( ) Dim x As Integer, y As Integer x = 12: y = 32 Call Proc(x, y) Print x。 ) 、選擇及重複結構組成,下列何者不是其主要的特點?(A)從上而下將程式分解成多個程式模組 (B)每一個程式模組都具有多個入口及出口 (C)每一個程式模組分別負責一件獨立的工作 (D)簡化程式的複雜度 ( ) (subprogram)的敘述,下列何者不正確?(A)可使主程式易於維護 (B)副程式之中可再去執(zhí)行另一個副程式 (C)每一個主程式都必須要有副程式 (D)若程式中有某部份需經常用到者可將其寫成副程式 ( ) ?10 CLS 20 K = 1 30 WHILE_____________40 K = K + 1 50 WEND 60 PRINT K ^ 270 END(A)K = 10 (B)K 10 (C)K 10 (D)K = 100 ( ) Basic程式是在計算ST = 1SUM = 0 FOR K = 1 TO 7 SUM = SUM + ST * ST ST = ST + K NEXT K PRINT SUM(A)1 ^ 2 + 2 ^ 2 + 3 ^ 2 +...+ 7 ^ 2 (B)1 ^ 2 + 3 ^ 2 + 5 ^ 2 +...+ 13 ^ 2 (C)1 ^ 2 + 2 ^ 2 + 4 ^ 2 +...+ 64 ^ 2 (D)1 ^ 2+2 ^ 2 + 4 ^ 2 + 7 ^ 2 +...+ 22 ^ 2 ( ) Basic迴圈中的敘述最少會被執(zhí)行1次?(A)Do While...Loop (B)Do...Loop Until (C)Do While...Continue (D)Do Until...Loop ( ) Visual Basic 語言片段程式的結果為何?S = 0 For X = 1 to 3