下列程序运行后的输出结果是 下列程序运行后的输出结果是 Option base 1Private Sub Command

下列程序运行后的输出结果是
下列程序运行后的输出结果是
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
loon300 1年前 已收到1个回答 举报

无脚爬虫 幼苗

共回答了14个问题采纳率:85.7% 举报

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

1年前

8
可能相似的问题
Copyright © 2024 YULUCN.COM - 雨露学习互助 - 16 q. 1.419 s. - webmaster@yulucn.com