p-1

Size: px

Start display at page:

Download "p-1"

镜暴
4 years ago
Views:

1 A 卷選擇題共 50 題 ( 共 100 分 ) 1. 下列何者是下列虛擬碼的流程圖? a = 1 b = 2 a < 10 and b < 20 While (a < 10 And b < 20) If (a 等於奇數 ) = 1 Then Else a 等於奇數 (C) do while(a < 10 and b < 20) (D) if (a 等於奇數 ) then a < 10 and b < 20 else end a 等於奇數 (A) end do a < 10 and b < 執行下列程式片段後, 輸出的結果為何? C = 2 For I = 1 To 10 If I Mod 2 = 0 Then C = C + I a 等於奇數 Print C (A)57 (B)55 (C)32 (D)30 (B) 3. 執行下列程式後, 輸出的結果為何? S = 1 For N = 1 To 5 S = S + 2 Next N Print N; S (A)5 11 (B)5 12 (C)6 11 (D) 利用下述程式計算出 (1 * 1) + (2 * * 2) + (3 * * * 3) 的值, 則空格中要填入什麼內容? S = 0 For K = 1 To 3 For M = 1 To S = S + K * M Next M

2 Next K Print S (A)3 (B)K 1 (C)4 K (D)K 5. 執行下列程式後, 輸出的結果為何? Dim x As Integer For n = 100 To 120 Step 10 If n Mod 5 = 0 Then x = n / 4 Print x; Next n (A) (B) (C) (D)30 6. 執行下列 Visual Basic 程式片段後, 請問 S =? Dim S, X As Integer S = 0 X = 1 While X < 10 X = X + 1 If (X Mod 3 < 1) Then S = S + X (A)9 (B)12 (C)18 (D)24 7. DIM M%(8) 表示定義一陣列, 其每一陣列元素佔用記憶體空間為多少 Bytes? (A)18 (B)16 (C)8 (D)2 8. 執行下列 Visual Basic 語言片段程式的結果為何? S = 0 For K = 1 To 2 For J = 2 To 3 S = S + K * J Next K Print S (A)10 (B)13 (C)15 (D)20 9. 下列關於二元搜尋法的敘述中, 何者正確? (A) 又稱為選擇搜尋法 (B) 適用於資料量大或排列具有順序性的情況下 (C) 比對次數最多為 (1 + n) / 2 (D) 當資料筆數很多時, 會佔用很多時間, 效率並不高 10. 執行下列程式後, 輸出的結果為何? For I = 1 To 50 If I Mod 13 = 1 Then N = N + 1 Print "N ="; N (A)N = 2 (B)N = 3 (C)N = 4 (D)N = 在 Visual Basic 中, 執行下列程式, 其結果為何? Call Sum(2, 10) Sub Sum(X As Integer, Y As Integer) TOTAL = X ^ Y Print TOTAL (A)0 (B)512 (C) 1024 (D) 利用 Visual Basic 撰寫用來計算 1~100 之間的奇數和之程式, 則在下列空格內須填入哪些數字? Sum = 0 For i = To 100 Step Sum = Sum + I i = i +1 Next i Print Sum (A)1,1 (B) 1,2 (C)2,1 (D)2,2 13. 有關下列 Visual Basic 程式碼的執行結果, 何者正確? a = 2: b = 1 Print F(a, F(a, b)) Function F(X, Y) F = X ^ 2 + Y ^ 2 End Function (A)10 (B)13 (C)20 (D) 執行下列程式後,C 值為何? C = 2 For I = 1 To 10 If I Mod 2 = 0 Then C = C + 1 (A)5 (B)6 (C)7 (D)8 15. 執行下列程式片段後, 輸出的結果為何? c = 10: d = 1 Until c < 1 Sum = Sum + d If d > 0 Then d = d + 1 Else d = d 1 d = d c = c 1 Print Sum (A)0 (B)5 (C) 5 (D) 下面程式可完成之工作為何? 10 S = 0 20 X = 1 30 While X < X = X S = S + X Print S (A) 計算 (B) 計算 (C) 計算 (D)

3 計算若給定如下之 Visual Basic 副程式, 則呼叫 Invest ( 3,15 ) 會得到何種結果? Sub Invest ( X as Integer, Y as Integer ) Ans = ( X ^ 2 + Y Mod 4 ) / 3 Print Ans (A)3 (B)4 (C)12 (D) 執行下列 Visual Basic 程式片段後, 輸出的結果為何? Dim i As Integer s = 0: i = 1 Until i > 7 i = i + 1 While s < i s = s + i i = i + 1 Print i + s (A)19 (B)18 (C)17 (D) 關於排序與搜尋的敘述, 下列何者錯誤? (A) 所謂排序, 就是將資料排列成某種特定的順序 (B) 在一群資料中, 尋找合於條件的資料, 這個過程稱為資料的搜尋 (C) 使用循序搜尋法, 資料不必事先排序 (D) 透過排序的動作可在一群資料中找到合於條件的資料 20. 在 Visual Basic 語言中, 若宣告 Dim A(2, 3, 4, 5) As Single, 下列何者有誤? (A) 與 Option Base 0: Dim A(2, 3, 4, 5) 同義 (B) 共含 120 個元素 (C) 為單精度陣列 (D) 與 DIM A!(2, 3, 4, 5) 意義相同 21. 下列何者不能有效協助程式在測試階段的除錯工作? (A) 採用結構化程式設計 (B) 按流程圖追蹤程式邏輯 (C) 減少複雜的邏輯判斷式 (D) 減少使用副程式及函數呼叫 22. 若有 20 個資料 ( 值依序為 1 到 20) 以一個二維陣列 (5, 4) 儲存 ( 先第一行再第二行 ), 請問 (3, 3) 位置的值為何? (A)13 (B)11 (C)19 (D) 下列 Visual Basic 程式片段執行後,T 的值為何? T = 0 U = 0 DO WHILE U < 30 IF U MOD 2 = 1 THEN T = T + U END IF U = U + 1 LOOP (A)256 (B)240 (C)225 (D) 下列關於排序的敘述, 何者錯誤? (A) 要排序的資料量會影響排序的速度 (B) 快速排序法使用分而治之的概念 (C) 氣泡排序法不能用來將資料由大排到小 (D) 快速排序法比氣泡排序法有較佳的效率 25. 陣列 (Array) 的註標 (index) 通常是 (A) 實數 (B) 整數 (C) 小數 (D) 分數 26. 請問下列哪一個 Visual Basic 程式片段, 輸出的結果為 45? (A)Cnt = 0 Cnt = Cnt + 1 While Cnt > 10 Print Sum (B)Cnt = 10 Until Cnt < 0 Cnt = Cnt 1 Print Sum (C)Cnt = 0 Cnt = Cnt + 1 While Cnt < 10 Print Sum (D)Cnt = 10 Cnt = Cnt 1 Until Cnt < 0 Print Sum 27. 下列 Visual Basic 程式執行的結果為何? X = 1: Y = 1 X = X * Y Y = Y + 2 Until Y > 10 Print X (A)1 5 (B)1 0 5 (C)9 4 5 (D) 某家百貨公司週年慶, 出現大排長龍的人潮, 小惠想在一長串的隊伍中找到某位友人, 若她是從隊伍的第一個人往後逐一尋找, 請問她採用的搜尋方法是 (A) 二元搜尋法 (B) 費式搜尋法 (C) 插補搜尋法 (D) 循序搜尋法 29. 有關下列 Visual Basic 程式碼的執行結果, 何者正確? a = 43: B = 20 C = a \ B: GoTo RESULT D = a Mod B RESULT:

4 Print C, D (A)2 (B)2 0 (C)2 3 (D) 螢幕需列印以下結果則程式內之空格應填入哪個運算式? For I = 1 To 4 For J = 1 To 4 If Then Print "1"; Else Print "0"; Print (A)I = J (B)I <> J (C)I = 4 J (D)I = 5 J 31. 關於結構化程式設計的觀念, 下列何者不是其優點? (A) 是一種由上而下的設計方法 (B) 將程式分解成多數個具有獨立功能的模組 (C) 每個模組功能單元自成一段程式 (D) 不需要做整合測試的一種程式設計方法 32. 下列 Visual Basic 程式片段, 若在輸入資料的訊息交談視窗中, 輸入的數值 ( 在下列程式的第 2 行 ) 為 5, 請計算該程式片段的執行結果 < 第 1 行 > K = 0 < 第 2 行 > Q = InputBox(" 輸入數值 ") < 第 3 行 > While K < 5 < 第 4 行 > Q = K + 1 < 第 5 行 > K = K + 1 < 第 6 行 > < 第 7 行 > Print K (A)5 (B)6 (C)0 (D) 關於下列 Visual Basic 程式片段的敘述, 何者有誤? A = 1: B = 1 For i = A B To A + B Step A / B Print i; Next (A) 迴圈敘述共執行 3 次 (B) 輸出結果依序為 (C)Step 為 1 (D) 迴圈敘述僅執行 1 次 34. 程式中 For a = 5 To 終值 Step 增加值之終值應為何? (A) 2 (B) 1 (C)1 (D)2 start a = 5 a >= 1 b = b * a d = a + b + c c = c + a output d a = a 2 stop Private Sub Form_Click( ) For a = 5 To 終止值 Step 增 Next a 35. 執行下列 Visual Basic 程式片段後, 輸出的結果為何? Dim A(4) For I = 1 To 4 If (I Mod 2 <> 0) Then A(I) = I ^ 2 1 Else A(I) = I ^ Print A(4) + A(3) A(2) (A)15 (B)20 (C)25 (D) 執行下列 Visual Basic 程式片段後, 請問... 迴圈會執行幾次? total = 0: Counter = 1 total = total + Counter Counter = Counter + 1 If total > 10 Then Exit While Counter <= 10 (A)20 (B)15 (C)10 (D)5 37. For I = 1 To N 1 For J = I + 1 To N If S(I) > S(J) Then TEMP = S(I) S(I) = S(J) S(J) = TEMP 上述程式為一排序程式, 若 S 陣列中之元素個數為 5 個 (N = 5), 則上述程式之比較動作共作了幾次? (A)10 (B)5 (C)15 (D) 請參考下列程式......

5 Dim Count, Sum As Integer Count = 1: Sum = 0 While Count < 10 For Q = 1 To Count Sum = Sum + Q Next Q Count = Count + 1 Print "SUM ="; Sum 請問 Print "Sum="; Sum 印出的結果如何? (A)SUM = 45 (B)SUM = 55 (C)SUM = 165 (D)SUM = 在 N 筆資料中, 將相鄰的兩個資料以兩兩相互比較, 並按順序調整位置, 繼續依此要領比較, 直到所有的資料都比較完畢, 此種方法稱為 (A) 選擇排序法 (B) 氣泡排序法 (C) 循序搜尋法 (D) 二分搜尋法 40. iphone 在美國首賣當日, 引爆大批人潮排隊搶購, 有人甚至利用替人排隊來賺取排隊工請問這種依先後順序購買產品的方式類似下列哪一種資料結構? (A) 堆疊 (B) 佇列 (C) 陣列 (D) 環狀 41. 執行下列 Visual Basic 程式片段後, 輸出的結果為何? Dim array1(10, 10) As Integer Dim i As Integer, j As Integer For i = 1 To 3 For j = 2 To 4 array1(i, j) = i + j Next j Next i Print array1(2, 3) + array1(3, 4) (A)10 (B)11 (C)12 (D) 下列 Visual Basic 程式片段是用來求出整數值 N 的所有正因數, 請問在空格中應填入什麼內容, 才能使此程式正常運作? i = 1 While i <= N If Then Print i & " 是 " & N & " 的正因數 " i = i + 1 (A)N mod i > 0 (B)N mod i < 0 (C)N mod i <> 0 (D)N mod i = 使用 Visual Basic(VB) 程式語言執行下列程式碼後, 結果為何? I = 6 J = 1 While I <= 10 I = I + 1 J = J * I Print " J = "; J (A)J = 56 (B)J = 504 (C)J = 5040 (D)J = 執行下列 Visual Basic 程式之結果, 螢幕顯示何值? Dim A(10) For I = 1 To 10 A(I) = 2 * I Print A(1) + A(5) (A)10 (B)12 (C)14 (D) 執行下列程式之結果, 印出 M =? M = 0 For I = 0 To 5 For J = 0 To 10 I * 2 M = M + 1 Print "M ="; M (A)33 (B)34 (C)35 (D) 下列有關資料搜尋之敘述, 何者錯誤? (A) 循序搜尋法, 資料檔必須儲存在磁帶上 (B) 二分搜尋法, 必須使用已排序好之資料檔 (C) 若欲從較大之資料檔中搜尋少量資料, 使用循序搜尋法之平均搜尋速度較二分搜尋法慢 (D) 循序搜尋法是用逐筆檢查之方式, 以尋找所指定的資料 47. 衣琳送給自己的 18 歲生日禮物, 是在左手指刺上一隻小蛇, 她打算先刺一部分的圖案後再告知媽媽, 如果沒被媽媽責罵的話, 再繼續將整個刺青完成請問上述先做局部刺青再根據家人是否同意, 來決定是否繼續完成刺青圖案的做法, 與 Visual Basic 中的哪一個程式敘述的概念類似? (A)... Until (B) While... (C)For...Next (D)If...Then...Else 48. 以下是對有 n 個元素的陣列 A( 註標範圍 :1 ~ n), 執行氣泡式排序 (bubble sort) 的 Visual Basic 程式片段第二行空格處應填入何式才正確? For pass = 1 To n 1 For j=1 To If A(J) > A(J + 1) Then temp = A(J): A(J) = A(J + 1): A(J + 1) = temp Next pass (A)n pass (B)n pass + 1 (C)n pass 1 (D)n pass 執行下列程式後, 輸出 I 值的結果為何? I = 32 If I > 40 Then Exit I = I + 5

6 Print I (A)32 (B)37 (C)42 (D) 下列 Visual Basic 程式片段執行後,J 的值為何? J = 0 FOR K = 1 TO 5 FOR L = K TO 5 J = J + K * L NEXT L NEXT K (A)134 (B)140 (C)174 (D)225

p-2

p-2 B 卷選擇題共 50 題 ( 共 100 分 ) 1. 執行下列 Visual Basic 程式片段後, 共輸出幾筆資料? x = 0: y = 1 Print y x = x + y Print x y = y + 1 If x >= 10 Then Exit Loop While y