【7A文】高职招考计算机类程序设计数组知识.doc

《【7A文】高职招考计算机类程序设计数组知识.doc》由会员上传分享，免费在线阅读，更多相关内容在应用文档-天天文库。

1、【MeiWei_81-优质适用文档】数组训练1．DIMA(3,3)FORI=1TO3FORJ=1TO3A(I,J)=inputbox(“请输入一个整数”)NEXTJNEXTIFORI=1TO2FORJ=I+1TO3TEMP=A(J,I)：A（J，I）=A（I，J）：A（I，J）=TEMPNEXTJNEXTIPRINTFORI=1TO3FORJ=1TO3PRINTA（I，J）；NEXTJPRINTNEXTI程序运行后，分别输入：1、6、4、8、2、5、9、3、7，则程序的运行结果为：。2、DIMa(10,10)k=1fori=1to10forj=1toia(I,J)

2、=kk=k+1printa(I,j);ifk>10thenENDnextjprintnextiend【MeiWei_81-优质适用文档】【MeiWei_81-优质适用文档】以上程序运行后，a(3,3)的值是3．下列程序的运行结果为：。DimA(5,5)AsInteger,IAsInteger,JAsIntegerForI=1TO3ForJ=1To3A(I,J)=(I-1)K3+J：PrintA(I,J)；NextJPrintNextIEnd4、在窗体上画一个名称为Commandl的命令按钮，然后编写如下程序：PrivateSubCommandlClick()Dim

3、iAsInteger,jAsIntegerDima(10,10)AsIntegerFori=1To3Forj=iTo3a(i,j)=(i-1)K3+jPrinta(i,j);NextjPrintNextiEndSub程序运行后，单击命令按钮，窗体上显示的是_____。5、在窗体上画一个命令按钮，名称为Command1,然后编写如下代码：OptionBase0PrivateSubCommand1_Click()DimA(4)AsInteger,B(4)AsIntegerFork=0To2A(k+1)=InputBox(“请输入一个整数”)：B(3-k)=A(k+1)

4、NextkPrintB(k)EndSub【MeiWei_81-优质适用文档】【MeiWei_81-优质适用文档】程序运行后，单击命令按钮，在输入对话框中分别输入2、4、6，输入结果为_____。6、有如下程序:dimA(5)FORK=1TO5A(K)=2KKNextkFORK=2TO4A(K)=A(K+1)+A(K-1)NextkprintA(2),A(4)则程序输出结果是__________。７．下列程序运行后输出的结果是（　　　　　）FORI=1to10A(I)=IK10+INEXTIPRINTA(6)/A(5)8、在窗体上添加一命令按钮，其名为Command

5、1,然后编写如下事件代码：PrivateSubCommand1_Click()Dima(5)AsInteger,b(5)AsIntegern=3ForI=1to5a(i)=I:b(i)=2Ka(i)+iNextIPrinta(n);b(n)EndSub程序运行的结果为_________________。9.Optionbase1PrivateSubCommand1_Click()Dima(3,3)Fori=1to3Forj=1to3a(i,j)=iKj+i【MeiWei_81-优质适用文档】【MeiWei_81-优质适用文档】NextjNextiSum=0Fori

6、=1to3Sum=Sum+a(i,4-i)NextiPrintSumEndSub运行后单击按钮,输出结果是。10．有如下程序：privatesubform_click()dima(3,3)forj=1to3fork=1to3ifj=kthena(k,j)=1elseifj

7、1-优质适用文档】【MeiWei_81-优质适用文档】　Privatesubcommand1_click()dima(5)asinteger,b(5)asintegern=3fori=1to5a(i)=ib(n)=2Kn+inextiPrinta(n);b(n)程序运行的结果为（　　）12、程序运行后，单击命令按钮，输出结果是（）Privatesubform_click()Dimarr(100)Fori=1to100Arr(i)=2KiNextiPrintarr(arr(15)-2)Endsub13、dimx(3,5)fori=1to3forj=1to5x(i,j

8、)=x(i