以下程序的输出结果是（ ）。
Option Base 1
Private Sub Command1_Click(
分类: 19信息竞赛自组题02发布时间: 2023-12-01 12:13浏览量: 4
以下程序的输出结果是（ ）。
Option Base 1
Private Sub Command1_Click()
Dim a(10),p(3) As Integer
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