( )7. 執行以下 Visual Basic 程式，其 A(4, 4) 結果為何？ (A)0 (B) 20 (C) 70 (D) 112 ```vba Dim A(4, 4) For i = 0 To 4 For j = 0 To 4 A(i, j) = i + j Next Next For i = 2 To 4 For j = 2 To 4 A(i, j) = A(i - 1, j) + A(i, j - 1) Next Next Console.Write(A(4, 4)) ```

( ) 11. 執行下列 Visual Basic 程式，輸出結果為何? (A) 1 (B) 2 (C) 3 (D) 4 Sub Main() Dim A() As Integer = {0, 2, 5, 3, 4, 1} Dim i, j As Integer For i = 1 To 4 For j = i + 1 To 5 If A(i) < A(j) Then SWAP(A(i), A(j)) Next j Next i Console.WriteLine(A(4)) End Sub Sub SWAP(ByRef A, ByRef B) Dim T As Integer T = B : B = A : A = T End Sub 第 3 頁，共 7 頁

( )7. 執行以下 Visual Basic 程式，其 A(4, 4) 結果為何？
(A)0
(B) 20
(C) 70
(D) 112

```vba
Dim A(4, 4)
For i = 0 To 4
For j = 0 To 4
A(i, j) = i + j
Next
Next
For i = 2 To 4
For j = 2 To 4
A(i, j) = A(i - 1, j) + A(i, j - 1)
Next
Next
Console.Write(A(4, 4))
```

相關試題

相關試卷