灵鹊做题网下列程序运行后的输出结果是
来源：学生作业帮 编辑：灵鹊做题网作业帮 分类：综合作业 时间：2024/04/28 10:52:06
下列程序运行后的输出结果是
下列程序运行后的输出结果是
Option base 1
Private Sub Command1_Click()
Dim a（10）,p(3) as integer
k=5
for i= 1 to10
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
下列程序运行后的输出结果是
Option base 1
Private Sub Command1_Click()
Dim a（10）,p(3) as integer
k=5
for i= 1 to10
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
k=5
a(1)=1……a(10)=10
p(1)=a(1)*1=1,p(2)=2*2=4,p(3)=9
k=0+p(1)*2=2
k=2+p(2)*2=10
k=10+p(3)*2=28
a(1)=1……a(10)=10
p(1)=a(1)*1=1,p(2)=2*2=4,p(3)=9
k=0+p(1)*2=2
k=2+p(2)*2=10
k=10+p(3)*2=28