• /  12
  • 下载费用: 19.90积分  

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

'【7A文】高职招考计算机类程序设计数组知识.doc'
【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)=kk=k+1printa(I,j);ifk>10thenENDnextjprintnextiend以上程序运行后,a(3,3)的值是 3.下列程序的运行结果为: 。DimA(5,5)AsInteger,IAsInteger,JAsIntegerForI=1TO3ForJ=1To3 A(I,J)=(I-1)K3+J: PrintA(I,J);NextJPrintNextIEnd4、在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序:PrivateSubCommandlClick()DimiAsInteger,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)NextkPrintB(k)EndSub程序运行后,单击命令按钮,在输入对话框中分别输入2、4、6,输入结果为_____。6、有如下程序:dimA(5)FORK=1TO5A(K)=2KKNextkFORK=2TO4A(K)=A(K+1)+A(K-1)NextkprintA(2),A(4)则程序输出结果是__________。7.下列程序运行后输出的结果是(     )FORI=1to10A(I)=IK10+INEXTIPRINTA(6)/A(5)8、在窗体上添加一命令按钮,其名为Command1,然后编写如下事件代码: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+iNextjNextiSum=0Fori=1to3Sum=Sum+a(i,4-i)NextiPrintSumEndSub运行后单击按钮,输出结果是 。10.有如下程序:privatesubform_click() dima(3,3) forj=1to3 fork=1to3 ifj=kthena(k,j)=1 elseifj<kthen a(k,j)=2 else a(k,j)=3 endif nextk nextj forj=1to3 fork=1to3 printa(j,k); nextk print nextjendsub程序运行的结果是 。11、在窗体上添加一命令按钮,其名为command1,然后编写如下事件代码:  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)=x(i-1,j-1)+i+jnextj,iprintx(3,4)上面程序运行时输出的结果为 。14.在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:privatesubcommand1_click()DimintA(4)AsInteger,intB(4)AsIntegerFori=0To2intA(i+1)=iK2+1intB(3-i)=intA(i+1)NextiPrintintB(i)Endsub程序运行后的结果是               。15、在窗体上画一个命令按钮,然后编写如下程序:Privatesubcommand1_click()Dima(1to3,2to4)asintegerForI=1to3Forj=2to4A(I,j)=IK2+j*3NextjNextIPrinta(2,3)+a(3,2)Endsub程序运行后,单击命令按钮,在窗体上的的输出结果是 。16.PrivateSubCommand1_Click()DimsumAsIntegerDimarr(6)AsIntegerarr(0)=-1:arr(1)=2:arr(2)=3:arr(3)=-6:arr(4)=8:arr(5)=9Fori=0To5Ifarr(i)>0Thensum=sum+arr(i)NextiPrintsumEndSub上面程序运行后,单击Command1命令按钮,输出结果是 。17.privatesubform_click()dima(3,3)fori=1to3
关 键 词:
7A文 高职 招考 计算机 程序设计 数组 知识
 天天文库所有资源均是用户自行上传分享,仅供网友学习交流,未经上传用户书面授权,请勿作他用。
关于本文
本文标题:【7A文】高职招考计算机类程序设计数组知识.doc
链接地址: https://www.wenku365.com/p-39779992.html
关于我们 - 网站声明 - 网站地图 - 资源地图 - 友情链接 - 网站客服点击这里,给天天文库发消息,QQ:1290478887 - 联系我们

本站为“文档C2C交易模式”,即用户上传的文档直接卖给(下载)用户,本站只是中间服务平台,本站所有文档下载所得的收益归上传人(含作者)所有【成交的100%(原创)】。本站是网络服务平台方,若您的权利被侵害,侵权客服QQ:1290478887 欢迎举报。

1290478887@qq.com 2017-2027 https://www.wenku365.com 网站版权所有

粤ICP备19057495号 

收起
展开