( )24. 執行下列 BASIC 程式，其 A, B 結果為何?
(A) 0,4
(B) 4,0
(C) 0,0
(D) 4,4
Dim A, B, answer(3) As Integer
Dim Str As String
Str = "6710"
A = 0
B = 0
answer(0) = 1 : answer(1) = 0 : answer(2) = 6 : answer(3) = 7
For i = 0 To 3
For j = 0 To 3
If answer(i) = Val(Mid(Str, j + 1, 1)) Then
If i = j Then
A = A + 1
Else
B = B + 1
End If
End If
Next
Next

相關試題

相關試卷