UC知道请教几道VB题目
来源：百度知道 编辑：UC知道 时间：2024/05/05 14:20:51
1、
Dim a(10) As Integer,b(5) As Integer
For i=1 to 10
a(i)=i
Next i
For j=1 to 5
b(j)=j*20
Next j
A(5)=b(2)
Print a(5)
执行结果是？
2、
Dim m(10) As Integer,n(10) As Integer
I=3
For t=1 to 5
M(t)=t
n(i)=2*i+t
Next t
Print n(i);m(i)
执行结果是？
3、
Dim x(3,5)
For i=1 to 3
For j=1 to 5
X(i,j)=(i-1,j-1)+i+j
Next j
Next i
Print x(3,4)
执行结果是？
4、
Dim a(10,10)
For i=2 to 4
For j=4 to 5
a(i,j)=i*j
Next j
Next i
Print a(2,5)+a(3,4)+a(4,5)
执行结果是？
5、
Dim a(4) As Integer,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)
依次输入1、3、5，执行结果是？
1、首先你应该确定 A(5)=b(2) 是不是你得书写错误，如果是 a(5)=b(2)
那么“For i=1 to 10 a(i)=i Next i ” 你就可以不用去管这个循环，重要得是第二个循环得计算，循环是这样进行的 j=1 b(1)=1*20 Next j j=2 b(2)=2*20 =40 如此循环 但是其他的都可以不用看 现在记住 a(5)=b(2) =40 就好了。
2、以下由于时间关系不给你细说了 i=3这题看不清楚你得这个是不是正确的
第二题 该题中数组m（t）=t ,所以根据循环得到值为1到5，而数组n(i)中，由于你的i=3 不参加循环，所以它的值只随着t变化，所以结果如下； m(1)=1 n(3)=6 m(2)=2 n(3)=12 m(3)=3 n(3)=18 m(4)=4 n(3)=24 m(5)=5 n(3)=30
3、 运算过程复杂只能给你个结果了，15
4、据题意，由于各项之间没有什么联系 所以直接带入数据相乘 即 a(2,5)=2*5=10 a(3,4)=12 a(4,5)=20 所以最后输出 42
5、据题意 输入1时 k=0 循环开始 a(0+1)=Val(InputBox("请输入数据: ")) =1
b(3-0)=a(0+1)=1 输出1
输入3时 k=1 所以有 a(1+1)=Val(InputBox("请输入数据: "))= 3
b(3-1)=a(1+1)= 3
输入5时 k=2 所以有 a(2+1)=Val(InputBox("请输入数据: "))=5
b(3-2)=a(2+1)=5
所以本题中 b(0)=1 b(1)=5 b(2)=3 输出的结果理论上应该是 1 5 3
但是由于只给了一个输出所 实际上显示得结果就只是 1
另外你得原题也有不对 “ b=(3-k)=a(k+1) ”应该是“b(3-k)=a(k+1)
”
我也是新手 不对之处还望谅