10. 執行下列Visual Basic程式片段，輸出結果為何?

(A) 3
(B) 4
(C) 9
(D) 50

答案：登入後查看
統計： 尚無統計資料

相關試題

11. 執行下列 Visual Basic 程式片段，輸出結果為何? (A) 6 (B) 7 (C) 8 (D) 5 ```vba Dim A() As Integer = (92, 85, 80, 100, 76, 41, 34, 90) Dim i, Count_1, Count_2 As Integer Count_1 = 0 : Count_2 = 0 For i = 0 To ? If A(i) > 80 Then Count_1 = Count_1 + 1 If A(i) <= 60 Then Count_2 = Count_2 + 1 Next i Console.WriteLine(Count_1 + Count_2) ```

12. 執行下列 Visual Basic 程式片段，輸出結果為何? (A) 24 (B) 31 (C) 19 (D) 30 ```vba Dim Data As String = "2 3 5 7 11 13 17" Dim Numbers As New List(Of Integer) Dim Count As Integer = 0 For i = 0 To Data.Length - 1 Numbers.Add(Val(Data(i))) Next Numbers.Sort() For i = 1 To Numbers.Count - 2 Count = Count + Numbers(i) Next Console.WriteLine(Count) ```

13. 執行下列 Visual Basic 程式片段，輸出結果為何? (A) 7 (B) 8 (C) 11 (D) 12

14. 執行下列 Visual Basic 程式片段，輸出結果為何? (A) 2 (B) 3 (C) 12 (D) 15 ```vba Dim i, j, S As Integer S = 0 : i = 2 : j = 0 Do While i <= 5 Do While j < 3 S = S + 1 j = j + 1 Loop i = i + 1 Loop Console.WriteLine(S) ``` 第 3頁/共 5頁

15. 執行下列Visual Basic程式片段，輸出結果為何? (A) 1 (B) 6 (C) 7 (D) 12 ```vba Dim A, B, C As Integer A = 12 : B = 7 : C = 18 While B > 0 C = A Mod B : A = B : B = C End While Console.WriteLine(A + B + C) ```

16. 執行下列 Visual Basic 程式片段，輸出結果為何? (A) 4 (B) 5 (C) 6 (D) 7 ```vba Dim A, B, Count As Integer A = 6 : B = 8 While Count <= 12 While A < B A += 3 B += 2 Count += Math_Abs(A - B) End While A = A / 2 - 1 B = B / 2 End While Console.WriteLine(A + B) ```

17. 執行下列 Visual Basic 程式片段，輸出結果為何? (A) 15 (B) 26 (C) 27 (D) 28 ```vba Dim Sum, i, j As Integer Sum = 0 : i = 0 While i <= 4 For j = 1 To i + 1 Sum = Sum + 1 Next j i = i + 1 End While Console.WriteLine(Sum + i + j) ```

18. 執行下列Visual Basic程式片段，輸出結果為何? (A) 110100 (B) 110010 (C) 101011 (D) 011101 ```vba Console.WriteLine(Convert.TuString(A021 + A012, 2)) ```

19. 執行下列 Visual Basic 程式片段，輸出結果為何? (A) 35 (B) 33 (C) 17 (D) 15 ```vba Console.Write(Box(21)) ```

20. 執行下列 Visual Basic 程式片段，輸出結果為何? (A) 5 (B) 6 (C) 7 (D) 8 ```vba Sub Main() Dim Sum As Integer = GetSum(5) Console.WriteLine(Sum) End Sub Function GetSum(ByVal N As Integer): If N = 1 Then Return 1 If (N Mod 2 = 1) Then Return GetSum(N * 3 + 1) + 1 Else Return GetSum(N / 2) + 1 End 7f End Function ``` 第 4頁/共 5頁

相關試卷

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

2025 年 · #140178

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

2023 年 · #140179

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

2022 年 · #140166

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

2022 年 · #112729

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

2021 年 · #140064

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

2020 年 · #140451

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

2017 年 · #140401

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

2017 年 · #140235

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

2016 年 · #140232

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

2015 年 · #140384