UC知道VB 一道题
来源：百度知道 编辑：UC知道 时间：2024/07/05 01:04:12
Dim a(1 To 10)
Dim p(1 To 3)
k = 5
For i = 1 To 10
a(i) = i
Next i
For i = 1 To 3
p(i) = a(i * i)
Next i
For i = 1 To 3
k = k + p(i) * 2
Next i
Print k
End Sub
为什么答案不是 7 15 33, 我是初学者
Dim p(1 To 3)
k = 5
For i = 1 To 10
a(i) = i
Next i
For i = 1 To 3
p(i) = a(i * i)
Next i
For i = 1 To 3
k = k + p(i) * 2
Next i
Print k
End Sub
为什么答案不是 7 15 33, 我是初学者
只有一个PRINT，为什么要出三个数？在里面加上SHOW，将“print k”放入循环就行拉
show
Dim a(1 To 10)
Dim p(1 To 3)
k = 5
For i = 1 To 10
a(i) = i
Next i
For i = 1 To 3
p(i) = a(i * i)
Next i
For i = 1 To 3
k = k + p(i) * 2
Print k
Next i