( 9 )以下程序的功能是:将一维数组 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 【 9 】For j = 1 To 【 10 】B(i, j) = 【 11 】Print B(i, j);Next jPrintNext iEnd Sub
( 9 )以下程序的功能是:将一维数组 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 1
Private Sub Form_Click()
Dim i As Integer, j As Integer
Dim A(1 To 100) As Integer
Dim B(1 To 10, 1 To 10) As Integer
For i = 1 To 100
A(i) = Int(Rnd * 100)
Next i
For i = 1 To 【 9 】
For j = 1 To 【 10 】
B(i, j) = 【 11 】
Print B(i, j);
Next j
Next i
End Sub
相关考题:
以下程序的功能是:将一维组 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 iEnd Sub
下列事件过程的功能是:通过Form_Load事件给数组赋初值为35、48、15、22、67,Form_Click事件找出可以被3整除的数组元素并打印出来。请在空白处填入适当的内容,将程序补充完整。Dim Arr()Private Sub Form_Load()【8】End SubPrivate Sub Form_Click()【9】If Int(x / 3) =x / 3 ThenPrint xEnd IfNext xEnd Sub
下列事件过程的功能是:通过Foma_Load事件给数组赋初值为35、48、15、22、67, Form_Click事件找出可以被3整除的数组元素并打印出来。请在空白处填人适当的内容,将程序补充完整。Dim Arr()Private Sub Form_Load()______End SubPrivate Sub Form_CUck()For EaCh x In ArrIf Int(x/3)=x/3 ThenPdnt X
下列关于数组的叙述,错误的是A.使用数组前,要有DIMENSION或DECLEARE命令定义数组B.定义数组后,Visual FoxPro系统自动给每个数组元素赋以逻辑值.F.C.在Visual FoxPro中只能使用一维数组、二维数组或三维数组D.一个数组中各个数组元素可以不是同一种数据类型
以下程序的功能是:将一维数组A中的100个元素分别赋给二维数组B的每个元素并打印出来,要求把A(i)到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 iEnd Sub
下列对数组初始化语句的说明正确的理解是() int a[10]={6,7,8,9,10};A.将5个初值依次赋给数组前5个元素,剩余元素初始化为0B.将5个初值依次赋给数组前5个元素,剩余元素不进行初始化C.将5个初值依次赋给数组前5个元素,剩余元素随机赋值D.因为数组长度与初值的个数不相同,所以此语句不正确
2、下面关于二维数组的说法错误的是A.同行的数据在内存中连续存放。B.对全部数组元素都赋初值时,可以不指定数组第二维的长度。C.不能将二维数组作为一个整体输入与输出。D.将二维数组看作是一维数组时,该一维数组的每个元素本身又是一个一维数组。
实现模拟窗体菜单功能,实现对一维二维数组基本操作进行测试,具体菜单功能如下: 当输入11、12、13,分别执行一维数组数据录入;执行一维数组的每个元素增加10,并提示操作成功;显示一维数组的所有元素; 当输入21、22、23,分别执行二维数组数据录入;执行二维数组的每个元素增加5,并提示操作成功;显示二维数组的所有元素; 当输入quit,则退出