Question

睦月璃央

誰能給我算法，謝謝

U886 BLLZO.6!
DLRURAL
356
8314
1238
46. 執行下列 Visual Basic 程式碼片段後,請問變數 data(1), num1, num2 的值依序是
多少?
(A)1,5,6 (B)9, 7,9
(C)9,5,16 (D)3 , 7,16
Module Module 1
Sub Main 0
REM 程式由此開始執行
Dim data () As Integer={1,3,5,7,9}
Dim numl, num2 As Integer
numl=data. Length
num2=data (4)
num2=Processing(data, numl)
End Sub
Function Processing(ByRef data() As Integer, ByVal
num1 As Integer)
data(1)=data(1)^2
numl=data(3)
Processing=(numl+data(1))
End Function
End Module
47
56 Aru
A.