阿摩線上測驗
登入
首頁
>
高中技藝◆程式設計
>
103年 - 103 全國高級中等學校學生技藝競賽考試_商業類: 程式設計#140708
> 試題詳解
6. 執行下列 Visual Basic 程式片段，輸出結果為何?
(A) 4
(B) 5
(C) 6
(D) 7
答案：
登入後查看
統計：
尚無統計資料
相關試題
7. 執行下列 Visual Basic 程式片段，輸出結果為何? (A) 10 (B) 15 (C) 16 (D) 25
#3926701
8. 執行下列 Visual Basic 程式片段，輸出結果為何? (A) 2 (B) 3 (C) 6 (D) 12 Dim i, j, S As Integer i=2:j=1 Do While i <= 5 Do While j < 4 S=S+1 j=j+1 Loop i=i+1 Loop Console.Write(S)
#3926702
9. 執行下列 Visual Basic 程式片段，輸出結果為何? (A) 0 (B) 1 (C) 2 (D) 4
#3926703
10. 執行下列 Visual Basic 程式片段，輸出結果為何? (A) 8 (B) 22 (C) 10 (D) 12 Dim A(3, 3) As Integer For i = 1 To 3 For j = 1 To 3 A(i, j) = 2*A(i - 1, j - 1) + i + j Next j Next i Console.Write(A(2, 2))
#3926704
11. 執行下列 Visual Basic 程式片段，輸出結果為何? (A) 12 (B) 13 (C) 17 (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 3 For j = 0 To 3 If i = j Then S(i, j) = S(i, j) + 2 Else S(i, j) = S(i, j) + 1 End If Next j Next i Console.WriteLine(S(2, 2))
#3926705
12. 執行下列 Visual Basic 程式片段，輸出結果為何? (A) 1 (B) 2 (C) 3 (D) 6 Dim A, S As Integer S = 0 : A = 123 While A > 0 S = S + (A Mod 3) A = A / 10 End While Console.WriteLine(S)
#3926706
13. 執行下列 Visual Basic 程式片段，輸出結果為何? (A) A (B) B (C) C (D) D Dim A, B, C, X As Integer A = 1 : B = 15 : C = 12 X = C \ (B \ 10) ^ 2 '提示: B \ 10 為整數除法 If (A Mod 2 <> 0) Then If X < 12 Then Console.Write("A") Else Console.Write("B") End If Else If X < 12 Then Console.Write("C") Else Console.Write("D") End If End If 第3頁 / 共 7 頁
#3926707
14. 執行下列 Visual Basic 程式片段，輸出結果為何? (A) 10 (B) 15 (C) 27 (D) 0 Dim Sum, i, j As Integer Sum = 0 i=0 While i <= 5 For j = 1 To i +2 Sum = Sum + 1 Next j i=i+1 End While Console.WriteLine(Sum)
#3926708
15. 執行下列 Visual Basic 程式片段，輸出結果為何? (A) 4 (B) 5 (C) 6 (D) 7 Dim i, n, m, K, Sum As Integer K = 13 Sum = 0 For n = 2 To K m=0 For i = 1 To n - 1 If n Mod i = 0 Then m=m+1 End If Next i If m <= 1 Then Sum = Sum + 1 End If Next n Console.WriteLine(Sum)
#3926709
16. 執行下列 Visual Basic 程式片段，輸出結果為何? (A) 8 (B) 4 (C) 2 (D) 12 Sub Main() Console.WriteLine(F16(2, 2)) End Sub Function F16(ByVal A, ByVal B) As Integer If (A > 0) And (B > 0) Then Return (F16(A - 1, B) + F16(A, B - 1)) Else Return (A + B) End If End Function 第4頁 / 共 7 頁
#3926710
相關試卷
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
阿摩線上測驗
登入
阿摩線上測驗
登入