第五章 数组习题

第五章数组习题

一、选择题

1. 如下数组声明语句，（）正确。

（A）Dim a[3,4] as integer （B）Dim a(3,4) as integer （C）Dim a(n,n) as integer （D）Dim a(3 4) as integer

2. 要分配存放如下方阵

⎪

⎪

⎪

⎭

⎫

⎝

⎛

9.9

8.8

7.7

6.6

5.5

4.4

3.3

2.2

1.1

，可使用声明语句( )来实现（不能浪费空间）。.

（A）Dim a(9) as single （B）Dim a(3,3) as single

（C）Dim a(-1 to 1,-5 to -3) as single （D）Dim a(-3 to -1,5 to 7) as integer

3. 数组声明语句Dim a(3,-2 to 2,5) as integer中，数组a包含的元素个数为（）。

（A）120 （B）75 （C）60 （D）13

4. 用语句Dim a(-3 to 5) as integer所定义的数组的元素个数是（）。

（A）6 （B）7 （C）8 （D）9

5. 用语句Dim a(3 to 5，-2 to2)所定义的数组的元素个数是（）。

（A）20 （B）12 （C）15 （D）24

6. 下面的B中有（）个数组元素。

Dim B : B=Array(1,2,3,4,5,6,7,8,9)

（A）任意多（B）8 （C）9 （D）10

二、填空题

1. 控件数组的名字由（）属性指定，而数组中的每个元素由（）属性指定。

2. 由Array函数建立的数组的名字必须是（）类型。

3. 数组定义Dim D(20) ，数组D有（）个数组元素。

三、分析程序的运行结果

1. 在窗体上画一个命令按钮command1，然后编写如下事件过程：

option base 1

private sub command1_click()

dim a

a=array(1,2,3,4)

j=1

for i=4 to 1 step -1

s=s+a(i)*j

j=j*10

next i

print s

end sub

程序运行后，单击command1，输出结果为：

2. 在窗体上画一个命令按钮command1，然后编写如下事件过程：

option base 1

private sub command1_click()

dim a,b(3,3)

a=array(1,2,3,4,5,6,7,8,9)

for i=1 to 3

for j=1 to 3

b(i,j)=a(i*j)

if j>=I then print tab(j*3);b(I,j);

next j

print

next i

end sub

程序运行后，单击command1，输出结果为：

4. 在窗体上画一个命令按钮command1，然后编写如下事件过程：option base 1

private sub command1_click()

dim a%(10),p(3) as integer

k=5

for i=1 to 10

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

程序运行后，单击command1，输出结果为：

6. 在窗体上画一个命令按钮command1，然后编写如下事件过程：option base 1

private sub command1_click()

dim a%(5,5)

for i=1 to 3

for j=1 to 4

if j>1 and i>1 then

a(i,j)=i*j

end if

next j

next i

for n=1 to 2

for m=1 to 3

print a(m,n);

next m

print

next n

end sub

程序运行后，单击command1，输出结果为：

：

：

11. 在窗体上画一个命令按钮command1，然后编写如下事件过程：private sub command1_click()

dim arr1%(10),arr2(10)

n=3

for i=1 to 5

arr1(i)=i

arr2(n)=2*n+i

next i

print arr2(n);arr1(n)

end sub

程序运行后，单击command1，输出结果为：

12. 在窗体上画一个命令按钮command1，然后编写如下事件过程：private sub command1_click()