6. 執行下列 Visual Basic 程式片段，輸出結果為何? (A) 1 (B) 2 (C) 3 (D) 4 ```vba Sub Main() Console.WriteLine(Compute($)) End Sub Function Compute(ByVal N As Integer) If N = 1 Then Return 1 If N Had 2 = 1 Then . Return Compute(N - 1) + Compute(N + 1) Else Return Compute(N / 2) End If End Function ```

9. 執行下列 Visual Basic 程式片段，輸出結果為何? (A) 2 (B) 3 (C) 4 (D) 5 ```txt Dim A() As Integer = {2, 5, 7, 9, 3, 1, 2} Dim B() As Integer = {3, 5, 3, 2, 8} Dim DP(A.Length, B.Length) As Integer For i = 1 To A.Length For j = 1 To B.Length If A(i - 1) = B(j - 1) Then DP(i, j) = DP(i - 1, j - 1) + 1 Else DP(i, j) = Math.Max(DP(i - 1, j), DP(i, j - 1)) End If Next Next Console.WriteLine(DP(A.Length, B.Length)) ``` 第 2頁/共 5頁

相關試題

相關試卷