高职招考计算机类程序设计数组知识.docVIP

.

.

PAGE1/NUMPAGES1

.

数组训练

1．DIMA(3,3)

FORI=1TO3

FORJ=1TO3

A(I,J)=inputbox(“请输入一个整数”)

NEXTJ

NEXTI

FORI=1TO2

FORJ=I+1TO3

TEMP=A(J,I)：A（J，I）=A（I，J）：A（I，J）=TEMP

NEXTJ

NEXTI

PRINT

FORI=1TO3

FORJ=1TO3

PRINTA（I，J）；

NEXTJ

PRINT

NEXTI

程序运行后，分别输入：1、6、4、8、2、5、9、3、7，则程序的运行结果为：。

2、DIMa(10,10)

k=1

fori=1to10

forj=1toi

a(I,J)=k

k=k+1

printa(I,j);

ifk10thenEND

nextj

print

nexti

end

以上程序运行后，a(3,3)的值是

3．下列程序的运行结果为：。

DimA(5,5)AsInteger,IAsInteger,JAsInteger

ForI=1TO3

ForJ=1To3

A(I,J)=(I-1)*3+J： PrintA(I,J)；

NextJ

Print

NextI

End

4、在窗体上画一个名称为mandl的命令按钮，然后编写如下程序：

PrivateSubmandlClick()

???DimiAsInteger,jAsInteger

???Dima(10,10)AsInteger

???Fori=1To3

Forj=iTo3

?a(i,j)=(i-1)*3+j

?Printa(i,j);

?Nextj

???Print

Nexti

EndSub

程序运行后，单击命令按钮，窗体上显示的是_____。

5、在窗体上画一个命令按钮，名称为mand1,然后编写如下代码：

OptionBase0

PrivateSubmand1_Click()

DimA(4)AsInteger,B(4)AsInteger

Fork=0To2

???A(k+1)=InputBox(“请输入一个整数”)：??B(3-k)=A(k+1)

Nextk

PrintB(k)

EndSub

程序运行后，单击命令按钮，在输入对话框中分别输入2、4、6，输入结果为_____。

6、有如下程序:

dimA(5)

FORK=1TO5

A(K)=2*K

Nextk

FORK=2TO4

A(K)=A(K+1)+A(K-1)

Nextk

printA(2),A(4)

则程序输出结果是__________。

７．下列程序运行后输出的结果是（）

FORI=1to10

A(I)=I*10+I

NEXTI

PRINTA(6)/A(5)

8、在窗体上添加一命令按钮，其名为mand1,然后编写如下事件代码：

PrivateSubmand1_Click()

Dima(5)AsInteger,b(5)AsInteger

n=3

ForI=1to5

a(i)=I:b(i)=2*a(i)+i

NextI

Printa(n);b(n)

EndSub

程序运行的结果为_________________。

9.Optionbase1

PrivateSubmand1_Click()

Dima(3,3)

Fori=1to3

Forj=1to3

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

Nextj

Nexti

Sum=0

Fori=1to3

Sum=Sum+a(i,4-i)

Nexti

PrintSum

EndSub

运行后单击按钮,输出结果是。

10．有如下程序：

privatesubform_click()

dima(3,3)

forj=1to3

fork=1to3

ifj=kthen

a(k,j)=1

elseifjkthen

a(k,j)=2

else

a(k,j)=3

endif

nextk

nextj

forj=1to3

fork=1to