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

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

ID:22022523

大小:52.50 KB

页数:12页

时间:2018-10-26

高职招考计算机类程序设计数组知识_第1页
高职招考计算机类程序设计数组知识_第2页
高职招考计算机类程序设计数组知识_第3页
高职招考计算机类程序设计数组知识_第4页
高职招考计算机类程序设计数组知识_第5页
资源描述:

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

1、WORD资料下载可编辑数组训练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=

2、1toia(I,J)=kk=k+1printa(I,j);ifk>10thenENDnextjprintnextiend技术资料专业分享WORD资料下载可编辑以上程序运行后,a(3,3)的值是3.下列程序的运行结果为:。DimA(5,5)AsInteger,IAsInteger,JAsIntegerForI=1TO3ForJ=1To3A(I,J)=(I-1)*3+J:PrintA(I,J);NextJPrintNextIEnd4、在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序:PrivateSubCommandl

3、Click()   DimiAsInteger,jAsInteger   Dima(10,10)AsInteger   Fori=1To3Forj=iTo3 a(i,j)=(i-1)*3+j Printa(i,j); Nextj   PrintNextiEndSub程序运行后,单击命令按钮,窗体上显示的是_____。5、在窗体上画一个命令按钮,名称为Command1,然后编写如下代码:OptionBase0PrivateSubCommand1_Click()DimA(4)AsInteger,B(4)AsIntegerFork=0T

4、o2   A(k+1)=InputBox(“请输入一个整数”):  B(3-k)=A(k+1)NextkPrintB(k)技术资料专业分享WORD资料下载可编辑EndSub程序运行后,单击命令按钮,在输入对话框中分别输入2、4、6,输入结果为_____。6、有如下程序:dimA(5)FORK=1TO5A(K)=2*KNextkFORK=2TO4A(K)=A(K+1)+A(K-1)NextkprintA(2),A(4)则程序输出结果是__________。7.下列程序运行后输出的结果是(     )FORI=1to10A(I)=I*

5、10+INEXTIPRINTA(6)/A(5)8、在窗体上添加一命令按钮,其名为Command1,然后编写如下事件代码:PrivateSubCommand1_Click()Dima(5)AsInteger,b(5)AsIntegern=3ForI=1to5a(i)=I:b(i)=2*a(i)+iNextIPrinta(n);b(n)EndSub程序运行的结果为_________________。9.Optionbase1PrivateSubCommand1_Click()Dima(3,3)Fori=1to3Forj=1to3技术资

6、料专业分享WORD资料下载可编辑a(i,j)=i*j+iNextjNextiSum=0Fori=1to3Sum=Sum+a(i,4-i)NextiPrintSumEndSub运行后单击按钮,输出结果是。10.有如下程序:privatesubform_click()dima(3,3)forj=1to3fork=1to3ifj=kthena(k,j)=1elseifj

7、jendsub程序运行的结果是。11、在窗体上添加一命令按钮,其名为command1,然后编写如下事件代码:技术资料专业分享WORD资料下载可编辑  Privatesubcommand1_click()dima(5)asinteger,b(5)asintegern=3fori=1to5a(i)=ib(n)=2*n+inextiPrinta(n);b(n)程序运行的结果为(  )12、程序运行后,单击命令按钮,输出结果是()Privatesubform_click()Dimarr(100)Fori=1to100Arr(i)=2*iN

8、extiPrintarr(arr(15)-2)Endsub13、dimx(3,5)fori=1to3forj=1to5x(i,j)=x(i-1,j-1)+i+jnextj,iprintx(3,4)上面程序运行时输出的结果为。14.在窗体上画一个名称

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。