( ) 2. 執行下列 Visual Basic 程式片段，其結果為何？
(A) 15
(B) 13
(C) 10
(D) F
Console.Write(Hex(15))

( ) 3. 執行以下 Visual Basic 程式片段，其結果為何？ (A) 1 (B) 1001 (C) 1000 (D) 1010 Console.Write( 1 Xor 1000 Xor 1000 )

( )4. 執行以下 Visual Basic 程式片段，其結果為何？(A) 0 (B) 1 (C) 2 (D) 3 Dim a, b As Integer a=7 b=4 Console.Write(a - (b * Fix(a / b)))

( )5. 執行下列 Visual Basic 程式片段，輸出結果為何? (A) 11 (B) 12 (C) 21 (D) 22 Sub Main() A5(12) End Sub Sub A5(ByVal x As Integer) If (x > 0) Then Console.Write(x Mod 10) A5(x / 10) End If End Sub 第1頁 / 共 8 頁

( )6. 執行下列 Visual Basic 程式片段，輸出結果為何? (A) 4 (B) 15 (C) 26 (D) 29 Dim S As Integer, K As Integer K=1:S=0 While K < 6 If K < 4 Then K=K+1 S=S+K Else K=K+2 S=S+K End If End While Console.WriteLine(S)

( )7. 執行下列 Visual Basic 程式片段，輸出結果為何? (A) 18 (B) 12 (C) 16 (D) 36 Dim A, B, C As Integer A = 162 B = 36 While (B > 0) C = A Mod B A=B B=C End While Console.Write(A)

( ) 8. 執行下列 Visual Basic 程式片段，輸出結果為何? (A) 2 (B) 3 (C) 6 (D) 12 Dim A, B As Integer A = 18 : B = 12 Do Until A = 0 Or B = 0 If A > B Then A = A Mod B Else B = B Mod A End If Loop If A = 0 Then Console.Write(B) Else Console.Write(A) End If 第2頁 / 共 8 頁

( ) 9. 執行下列 Visual Basic 程式片段，輸出結果為何? (A) 12 8 (B) 8 12 (C) 12 12 (D) 8 8 Dim A, B As Integer A = 12 : B = 8 A=A+B:B=A-B:A=A-B Console.WriteLine(A & " " & B)

( )10. 執行下列 Visual Basic 程式片段，輸出結果為何? (A) A (B) B (C) C (D) D Dim X As String Dim Y(20) As Char X = "ABCDE" For I = 0 To Len(X) - 1 Y(I) = Mid(X, 5 - I, 1) Next I Console.WriteLine(Y(1))

( )11. 執行下列 Visual Basic 程式片段，輸出結果為何? (A) 12 (B) 13 (C) 15 (D) 18 Dim i, j As Integer Dim S(,) As Integer = {{1, 2, 3, 4}, {5, 6, 7, 8}, {9, 10, 11, 12}, {13, 14, 15, 16}, {17, 18, 19, 20}} For i = 0 To 4 For j = 0 To 3 If i = j Then S(i, j) = S(i, j) + i + j Else S(i, j) = S(i, j) + i * j End If Next j Next i Console.WriteLine(S(2, 2))

( )12. 執行下列 Visual Basic 程式片段，輸出結果為何? (A) 1 (B) 2 (C) 3 (D) 7 Dim i, j As Integer Dim A(,) As Integer = {{1, 2, 3, 4}, {5, 6, 7, 8}, {9, 10, 11, 12}} Dim B(3, 4) As Integer For i = 0 To 2 For j = 0 To 3 B(j, i) = A(i, j) Next j Next i Console.WriteLine(B(2, 1)) 第3頁 / 共 8 頁

114年 - 114 全國高級中等學校學生技藝競賽考試_商業類:程式設計#140178

112年 - 112 全國高級中等學校學生技藝競賽考試_商業類:程式設計#140179

111年 - 111 全國高級中等學校學生技藝競賽考試_商業類:程式設計#140166

111年 - 111 全國高級中等學校學生技藝競賽學科試題_商業類:程式設計#112729

110年 - 110 全國高級中等學校學生技藝競賽考試_商業類:程式設計#140064

109年 - 109 全國高級中等學校學生技藝競賽考試_商業類:程式設計#140451

106年 - 106 全國高級中等學校學生技藝競賽考試_商業類:程式設計#140401

106年 - 106 全國高級中等學校學生技藝競賽考試_商業類:程式設計#140235

105年 - 105 全國高級中等學校學生技藝競賽考試_商業類:程式設計#140232

104年 - 104 全國高級中等學校學生技藝競賽考試_商業類:程式設計#141064