关于vb的一个小问题,希望有人解答
设执行以下程序段时依次输入1、3、5,执行结果为_____。Dima(4)AsIntegerDimb(4)AsIntegerForK=0To2a(K+1)=Val(Inp...
设执行以下程序段时依次输入1、3、5,执行结果为_____。
Dim a(4) As Integer
Dim b(4) As Integer
For K =0 To 2
a(K+1)=Val(InputBox(“请输入数据:"))
b(3-K) =a(K+1)
Next K
Print b(K)
a) 1
b) 3
c) 5
d) 0 答案:A
为什么选A,给个解释 展开
Dim a(4) As Integer
Dim b(4) As Integer
For K =0 To 2
a(K+1)=Val(InputBox(“请输入数据:"))
b(3-K) =a(K+1)
Next K
Print b(K)
a) 1
b) 3
c) 5
d) 0 答案:A
为什么选A,给个解释 展开
3个回答
展开全部
第一次:k=0,a(1)=1,b(3)=1
第二次:k=1,a(2)=3,b(2)=3
第三次:k=2,a(3)=5,b(1)=5
For循宏升仔环结束,k=3,Print b(3),因此结果是a。
为什么For循环结束后k=3?因为每次循环完成执行Next语句k值增加步长值,然后重新开始与条件(0 to 2)进行比较,如果条件符合则执行循环,否则执行蔽汪下一条语句。因此最后一次循环体(k=2)执行完成后k值增加1(k=3)笑清,然后再比较条件(不符合),最后执行下一句。
第二次:k=1,a(2)=3,b(2)=3
第三次:k=2,a(3)=5,b(1)=5
For循宏升仔环结束,k=3,Print b(3),因此结果是a。
为什么For循环结束后k=3?因为每次循环完成执行Next语句k值增加步长值,然后重新开始与条件(0 to 2)进行比较,如果条件符合则执行循环,否则执行蔽汪下一条语句。因此最后一次循环体(k=2)执行完成后k值增加1(k=3)笑清,然后再比较条件(不符合),最后执行下一句。
展开全部
for k=0 to 2 ......next K这个循环执行完后洞渣悔,k=3,则输出print b(3)。从for的循环体知道梁历,a(1)=b(3);a(2)=b(2);a(3)=b(1).依次输入1,3,5.则a(1)=1 =b(3).故答纳正案选A
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
输入完成后a(1)=b(3)=1,a(2)=b(2)=3,a(3)=b(1)=5,循环完后k=3,所以print b(3)=1
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询