![[填空题] 以下程序的功能是：将一维组A中的100个元素分别赋给二维数组B的每个元素并打印出来,要求把A(1)到A(10)依次赋给B(1,1)到B(1,10),把A(11)到A(20)依次赋给B(2,](http://www.mshxw.com/aiimages/31/259697.png "[填空题] 以下程序的功能是：将一维组A中的100个元素分别赋给二维数组B的每个元素并打印出来,要求把A(1)到A(10)依次赋给B(1,1)到B(1,10),把A(11)到A(20)依次赋给B(2,")
[填空题] 以下程序的功能是：将一维组A中的100个元素分别赋给二维数组B的每个元素并打印出来,要求把A(1)到A(10)依次赋给B(1,1)到B(1,10),把A(11)到A(20)依次赋给B(2,1)到B(2,10),……,把A(91)到A (100)依次赋给B(10,1)到B(10,10)。请填空。Option base 1Private Sub Form_Click()Dim i As Integer,J As IntegerDim A(1 To 100)As IntegerDim B(1 To 10,1 To 10)As IntegerFor i=1 To 100A(i)=Int(Rnd*100)Next iFor i=1 To 【 】 For J=1 To【 】B(i,j)= 【 】Print B(i,j)；Next jPrintNext i End Sub
参考答案：
A0,A0,A((i-A)*A0+j)问题解析:
根据题意,在嵌套循环中,i为外循环变量,循环次数为10次,控制数组B的行值,j为内循环变量,循环次数为10次,决定着数组B的列值,然后根据数组下标的关系,可写出(i-1)*10+j表达式,从而相应地对数组B进行赋值。二维数组B的元素与一维数组A的元素存在这样的对应关系：B(i,j)=A((i-1)*10+j),如B(1,1)=A(1)、B(2,1)=A(11)、B (10,1)=A(91)。
