計算機概論線上測驗
-1(25題版本)
單元：程式語言 每題4分，共100分，一律線上作答 ( )1. 如圖(二)所示，依流程順利執行完後，列印之A 值為何？ (A)6 (B)7 (C)8 (D)9 ( )2. 凱瑟琳受命為網路銀行設計一個客戶登錄程式，她先繪製了如右的流程圖，用來判斷客 戶輸入的密碼是否正確。右列各個流程圖節號上有「甲乙丙丁戊」的編號，請依此編號 順序選擇正確的執行動作。 判斷密碼是否正確？ 輸入密碼 提示輸入訊息 提示錯誤訊息 進入下一 程序(A) (B) (C) (D) ( )3. 執行下列Visual Basic程式片段後，變數N的值為何？ Dim N As Integer = 30 If N < 30 Then N = N \ 5 Else N = N Mod 5 End If (A)0 (B)1 (C)6 (D)7 ( )4. 下列這段BASIC程式碼，可以由身高及性別計算標準體重，計算後所印出的Weight值為 何？ Sex="F" : Height=170 If Sex="M" Then Weight=(Height-80)*0.7 Else Weight=(Height-70)*0.6 End If Debug.Print(Weight) (A)54 (B)56 (C)60 (D)63 ( )5. 使用BASIC程式語言執行下列程式碼後，則螢幕輸出結果是多少？ X=9:Y=5:Z=6
If (X Mod Y)> Z Then Debug.Print(Y Mod X) Else Debug.Print(Y Mod Z) End If (A) 0 (B)1 (C)4 (D)5 ( )6. 下列VB程式執行結果，變數A值為何？ A=10:B=5
If A>10 Or B<6 Then A=A+B A=A*B
(A)10 (B)15 (C)50 (D)75
( )7. 執行下列Visual Basic程式片段後，變數K的值為何？ Dim I,J,K As Integer
I=1 J=0 If I=0 Then If J=0 Then K=0 Else K=1 End If Else If J=0 Then K=2 Else K=3 End If End If (A)0 (B)1 (C)2 (D)3 ( )8. 執行下列Visual Basic程式片段後，變數a的值為何？ Dim a, b As Integer a = 0 : b = 95 If b >= 80 Then If b < 90 Then a = 1 Else a = 2 End If a = 3 End If (A)0 (B)1 (C)2 (D)3 ( )9. 下列Visual Basic程式片段，執行後的結果為何？ X=1:Y=150:Z=56.25 B=Z/(Y/100)^2 If(X Mod 2<>0) Then If B<26 Then
Debug.Print("ma") Else
Debug.Print("mb") End If Else If B<24 Then Debug.Print("fa") Else Debug.Print("fb") End If End If (A)ma (B)mb (C)fa (D)fb ( )10. 下列Visual Basic語言片段程式執行後，何者正確？ a=5 b=10 If (a Mod 2=0) Then a=a+1
ElseIf (b Mod 2=0) Then b=b+2 Else a=a+2 b=b+1 End If (A)a=6 (B)a=7 (C)b=11 (D)b=12 ( )11. 下列VB程式片段，執行後的C值何者正確？ A=1:B=2:C=3 If B>1 Then If A<1 Then C=2 Else C=4 End If End If (A)C=1 (B)C=2 (C)C=3 (D)C=4 ( )12. 執行下列Visual Basic程式片段後，變數s的值為何？ Dim r,s As Integer r=3 Select Case r Case 1,3 s=r Case 4,6 s=r*r
Case Is>=5,Is<=0 s=0 Case 3 s=-r End Select (A)-3 (B)0 (C)3 (D)9 ( )13. 下列Visual Basic程式執行後，總共輸出幾個#？ X=4.5\2 Select Case X Case 1:MsgBox("#") Case 2:MsgBox("##") Case Else:MsgBox("###") End Select (A)1 (B)2 (C)3 (D)6 ( )14. 下列Visual Basic程式片段執行後，s之值為何？ Dim i As Integer=20,s As String
Select Case i Case Is>10 s="a" Case 10 To 30 s="b" Case 15,20 s="c" Case 20 s="d" End Select (A)"a" (B)"b" (C)"c" (D)"d" ( )15. 執行下列Visual Basic程式片段後，變數S的值為何？ Dim S, I, N As Integer S = 1 N = 2 For I = 1 To 10 Step N S = S + I Next (A)24 (B)25 (C)26 (D)27 ( )16. 執行下列Visual Basic程式片段後，變數S的值為何？ Dim K As Integer Dim S As String S="0" For K=1 To 3
S="(" & K & "," & S & ")" Next K (A)(((1,0),2),3) (B)(1,(2,(3,0))) (C)(((3,0),2),1) (D)(3,(2,(1,0))) ( )17. 執行下列Visual Basic程式片段後，變數A的值為何？ A=0 For I=2 to -1 A=A+I Next I (A)-1 (B)0 (C)1 (D)2 ( )18. 請問執行下列的Visual Basic程式碼後，在「訊息視窗(MsgBox)」上的顯示數值為何？ Sub Main() Dim i As Integer Dim result As Integer result=1 For i=1 To 5 result=result*i Next If i>5 Then MsgBox(result) ElseIf i<=5 Then MsgBox(i) Else MsgBox(20) End If End Sub (A)1 (B)5 (C)20 (D)120 ( )19. 執行下列Visual Basic程式片段後，變數counter的值為何？ Dim a, b, counter As Integer
counter = 0 For a = 1 To 5
For b = a To 1 Step –1
If b Mod 2 = 0 Then counter = counter + 1 Next b
Next a
(A)4 (B)5 (C)6 (D)7
( )20. 執行下列Visual Basic程式片段後，變數S的值為何？ Dim I,K,S As Integer
S=0
For I=10 To 1 Step -1 For K=2 To I
S=S+1 Next K Next I (A)44 (B)45 (C)46 (D)54 ( )21. 執行下列Visual Basic程式片段後，變數c的值為何？ c=0
For a=1 To 30 Step 2 For b=30 To 1 Step -1 If a=b Then c=c+1 End If Next b Next a (A)0 (B)15 (C)30 (D)60 ( )22. 下列這段BASIC程式碼執行後，所印出的X值結果為何？ X=0
For Y=1 To 10 Step 2 For Z=10 To 1 Step –3 If Y=Z Then X=X+1 End If Next Z Next Y Debug.Print(X) (A)0 (B)2 (C)11 (D)20 ( )23. 執行下列Visual Basic語言片段程式的結果為何？ S=0 For X=1 To 2 For Y=1 To 3 S=S+1 Next Y S=S+2 Next X Debug.Print(S) NEXT K (A)4 (B)6 (C)10 (D)30 ( )24. 執行下列Visual Basic程式片段後，變數Sum的值為何？ Dim Sum As Integer = 0
Dim I As Integer = 1 Dim J As Integer = 1
For I = 0 To 5 For J = 1 To 5 Sum = Sum + 1 Next Next (A)5 (B)25 (C)30 (D)36 ( )25. 下列Visual Basic程式執行後，變數S的值為何？ Dim S ,C, I As Integer S=5：C=3 While C<=8 For I=1 To C S=S+2 Next I C=C+1 End While (A)70 (B)71 (C)72 (D)73
