阿摩線上測驗
登入
首頁
>
高職◆商業概論
> 101年 - 宜蘭高商101-2-3 高2計算機概論_綜34國貿#34960
101年 - 宜蘭高商101-2-3 高2計算機概論_綜34國貿#34960
科目：
高職◆商業概論 |
年份：
101年 |
選擇題數：
33 |
申論題數：
0
試卷資訊
所屬科目：
高職◆商業概論
選擇題 (33)
1. Visual Basic中，陣列之註標值預設為 (A)1(B)2 (C)3 (D)0
2. 在Select Case敘述中，下列有關Case子句的用法，何者錯誤？ (A)Case Is > 10 (B)Case 0 To 10 (C)Case 5 or 10 or 15 (D)Case <> 20
3. 下列哪一種迴圈會先執行一次迴圈內的敘述，然後再進行條件判斷，以決定是否繼續執行迴圈內的敘述？ (A)Do While…Loop (B)Do Until…Loop (C)For…Next (D)Do…Loop While
4. 在Visual Basic中宣告一個陣列 "Dim X(3, 3, 2) As Single"，表示陣列X是一個 (A)一維陣列 (B)三維陣列 (C)四維陣列 (D)二維陣列
5. 在Visual Basic語言中執行MsgBox(Mid("HELLO", 2, 3))，訊息交談窗顯示的結果為何？ (A)ELL (B)LL (C)LO (D)HEL
6. 在Visual Basic語言中，若宣告Dim A(2, 3, 4) As Integer，下列何者有誤？ (A)共佔用240 bytes的記憶體空間 (B)共含24個元素 (C)與Dim A%(2, 3, 4)意義相同 (D)為整數陣列
7. 「校園歌喉戰」曾發生同分的兩名參賽者需再進行第二輪比賽的情形，製作單位為求公平，以隨機抽出標有編號1、2的任一彩球，來決定哪位參賽者先出賽。試問若在沒有彩球的情形下，利用下列哪一個VB敘述，也可隨機產生1或2兩個數字？ (A)Int(Rnd() + 1) * 1 (B)Int(Rnd() * 1) + 1 (C)Int(Rnd() + 2) * 1 (D)Int(Rnd() * 2) + 1
8. 下列Visual Basic程式語言函數運算，何者正確？ (A)Math.Sqrt(5.8) = 5 (B)CInt(5.5) = 5 (C)Int(5.8) = 5 (D)Fix(5.8) = 6
9. 身上有50元，可選擇喝飲料、吃紅豆餅或品嚐冰淇淋，這種多重選擇的問題，在程式敘述中，使用下列何種語法最簡潔？ (A)Button1_Click( ) (B)MsgBox( ) (C)Select Case (D)If…Then
10. 在Visual Basic中，執行MsgBox(CInt(-5.6) + Fix(-3.7))，訊息交談窗顯示的結果為何？ (A)-3 (B)-9 (C)2 (D)-9.3
11. 執行下列Visual Basic程式片段後，C的值為何？ 1234" : B = "5678" C = Val(Mid(B, 2, 3)) + Val(Microsoft.VisualBasic.Right(A, 2)) (A)312 (B)712 (C)601 (D)690
12. 執行下列Visual Basic程式片段後，S的值為何？ A = 2 B = 3 S = A ^ B + Math.Abs(A - B) (A)10 (B)8 (C)7 (D)9
13. 在台北世貿舉行的電腦應用展，廠商為了吸引人潮及刺激買氣，推出排隊玩遊戲送好禮的活動。請問這種依排隊順序試玩遊戲的方式類似下列哪一種資料結構的存取規則？ (A)佇列(B)堆疊 (C)陣列 (D)環狀
14. 在Visual Basic語言中宣告一個陣列 Dim X(4, 6)，則共可使用多少個陣列元素？ (A)20 (B)35 (C)24 (D)4
15. 在Visual Basic中定義A陣列Dim A(3, 4) As Double，則此陣列A占用記憶體多少bytes的儲存空間？(A)96 (B)80 (C)160 (D)48
16. 下列生活實例的敘述中，何者與迴圈控制的概念最不相似？ (A)銀行門口放置的號碼機，每當顧客抽取號碼牌後，會再提供印製有下一個號碼的紙張 (B)將飲料放置在封口機上，該機器會自動以薄膜封住飲料杯口 (C)玩籃球投籃機時，只要在時間限制內，將球投入籃框中便會累計分數 (D)遊樂園內的旋轉木馬，會在時間內不斷的旋轉
17. 下列有關陣列的敘述，何者不正確？ (A)由一群資料型別相同的陣列元素所組成 (B)可有效率的管理及使用變數 (C)可降低電腦的耗電量 (D)可避免程式使用太多的變數
18. 下列哪一個不是後測式Do…Loop敘述的特色？ (A)最少會執行1次迴圈敘述 (B)Do…Loop While迴圈是條件為真時，執行迴圈敘述 (C)Do…Loop Until迴圈是條件為真時，跳離迴圈 (D)無論如何先判斷條件式，再依條件式成立與否，決定是否要執行迴圈敘述
19. 下列哪一個Visual Basic敘述，適合用來處理程式中某段須重複執行，且無法事先確定執行次數的工作？ (A)If…Then (B)Select…Case (C)For…Next (D)Do…Loop
20. 執行下列程式後，下列結果何者正確？ A = 3 : B = 4 If A + 3 < 5 Or B - 2 < 1 Then A = A + 2 B = B - 1 Else A = A - 2 B = B + 1 End If (A)B = 5 (B)B = 3 (C)A = 3 (D)A = 5
21. 執行下列Visual Basic程式片段後，d的值為何？ a = 5 : b = 2 : c = 3 If a > b Then c = 0 If a < b Then c = 1 Select Case c Case 0 : d = a mod 2 Case 1 : d = b * 2 End Select (A)1 (B)10 (C)5 (D)4
22. 執行下列程式後，SUM的值為何？ SUM = 0 For I = 10 To 2 Step -3 SUM = SUM + I Next I (A)17 (B)23 (C)10 (D)21
23. 執行下列程式後，K的值為何？ K = 0 For I = 1 To 5 For J = I + 2 To 4 K = K + 1 Next J K = K – 1 Next I (A)-2 (B)-3 (C)0 (D)-1
24. 執行下列程式後，I的值為何？ I = 33 Do If I > 40 Then Exit Do I = I + 5 Loop (A)38 (B)43 (C)48 (D)33
25. 執行下列程式後，T的值為何？ T = 0 : S = 1 While S <= 3 S = S + 1 T = T + S * (S - 1) End While T = T + S (A)24 (B)18 (C)22 (D)25
26. 執行下列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 ^ 2 + 1 End If Next I MsgBox(A(4) + A(3) - A(2)) (A)25 (B)30 (C)20 (D)15
27. 執行下列Visual Basic程式片段後，S的值為何？ S = 0 For X = 1 to 2 For Y = 1 to 3 S = S + 1 Next Y S = S + 2 Next X (A)10 (B)4 (C)30 (D)6
28. 執行下列程式後，畫面上印出的值為何？ X=1 : Sum = 0 While X < 10 If X < 6 Then Sum = Sum + X X = X * 2 End While Print X, Sum (A)16 15 (B)16 7 (C)8 7 (D)8 10
複選題
29. 執行下列程式後，有關A與B的值，下列何者正確？ A = 5 : B = 10 If (A / 2 = 2) Then A = A + 1 ElseIf (B Mod 2 = 0) Then B = B + 2 Else A = A + 2 B = B + 1 End If (A)B = 11 (B)B = 12 (C)A = 6 (D)A = 7
30. 下列程式中，如用For…Next計算1至100的奇數和，則下列程式 內，應依序填入哪些數字？ SUM = 0 For I = To 100 Step SUM = SUM + I Next I (A)1, 1 (B)1, 2 (C)2, 1 (D)2, 2
31. 執行下列程式後，出現提示符號時輸入數值3，則y值為何？ x = InputBox("請輸入任一整數") Select Case x Case 1, 3 y = x * x Case Is >= 10, Is <= 0 y = x Case 3 y = –x End Select (A)3 (B)27 (C)-3 (D)9
32. 執行下列Visual Basic程式後，何者的值與 B(3, 1)的值相等？ Dim B(3, 3) As Integer For I = 0 To 3 For J = 0 To 3 B(I, J) = 2 * J * (I + J) Next J Next I (A)B(1, 1) (B)B(2, 1) (C)B(1, 3) (D)B(0, 2)
33. 執行下列程式後，訊息交談窗會顯示幾個 "*" 號？ Dim I As Integer Dim star As String star = "" I = 20 Do star = star + "*" I = I - 6 Loop While I >= 1 MsgBox(star) (A)6 (B)5 (C)4 (D)3
申論題 (0)
阿摩線上測驗
登入
阿摩線上測驗
登入