全国计算机二级考试 97-99年visual basic考试试题及答案

全国计算机二级考试 97-99年visual basic考试试题及答案

1997年9月全国计算机等级考试二级BASIC笔试试题一、选择题((1)-(40)每个选项1分，(41)-(50)每个选项2分，共60分)下列各题A)、B)、C)、D)四个选项中，只有一个选项是个正确的，请将正确选项涂写在答题卡相应位置上，答在试卷上不得分。1.应用软件是指________。A)所有能够使用的软件B)能被各应用单位共同使用的某种软件C)所有微机上都应使用的基本软件D)专门为某一应用目的而编制的软件2.下列叙述中错误的是________。A)计算机要经常使用，不要长期闲置不用B)为了延长计算机的寿命，应避免频繁开关计算机C)在计算机附近应避免磁场干扰D)计算机用几小时后，应关机一会儿再用3.下列字符中，ASCII码值最小的是________。A)AB)aC)ZD)X4.用晶体管作为电子器件制成的计算机属于________。A)第一代B)第二代C)第三代D)第四代5.下列各不同进制的四个无符号数中，最小的数是________。A)(110111001)2B)(37)8C)(75)10D)(2A)166.二进制数1110111.11转换成十六进制数是________。A)77.CB)77.3C)E7.CD)E7.37.下列各无符号十进制数中，能用八位二进制表示的是________。A)296B)333C)256D)1998.计算机软件系统可分类为_________。A)程序与数据B)系统软件与应用软件C)操作系统与语言处器程序D)程序，数据与文档9.486机中的CPU同时能处理的二进制数位数为________。A)8B)16C)32nD)6410.在使用计算机的过程中，需要重新启动DOS，则要________。A)按CTRL+BREAKB)按^C键C)按CTRL+ALT+DEL键D)按^H键11.现要从软盘启动DOS(软盘中已存有DOS系统)，设有如下一些操作:①打开计算机电源;②将该软盘插入A驱动器;③关好A驱动器门.则冷启动的操作顺序为________。A)①→②→③B)③→②→①C)②→①→③D)②→③→①12.设当前盘中某一文件路径为ACBABC.C，当前目录为A，下列命令中错误的是________。A)CD..B)RDACBC)TYPEABABC.CD)TYPECBABC.C13.设当前盘中根目录下有一子目录AB，在子目录AB下有一文件PQ.BAS.现要查看文件PQ.BAS的内容，应使用命令________。A)TYPEABPQ.BASB)TYPEABPQ.BASC)TYPEPQ.BASD)DIRABPQ.BAS14.自动批自理文件必须放在________。A)C盘根目录中B)A盘根目录中C)启动盘的任一目录中D)启动盘的根目录中15.设当前盘当前目录为C:USERXYP，且当前盘当前目录为空，则下列命令中能正确执行的是________。A)RDC:USERXYPB)RDUSERXYPC)MDUSERXYUSERD)MDUSERXYPXY16.下列DOS命令中，合法的是________。A)DISKCOMPA.CB.CB)TYPEA.C>>B.CC)COMPA:B:D)COMPA:nA:17.设当前盘为C盘，所用的软盘已格式化，且容量相同，则下列DOS命令中错误的是________。A)DISKCOPYA:A:B)COPYA:*.*C)COPY*.*D)COPYA:*.*C:18.下列DOS命令中错误的是________。A)TYPEA.TXTB)TYPEA.TXTPRNC)COPY*.TXTPRND)COPYCONPRN19.下列四组DOS命令中，互相等价的一组是________。A)COPYA:*.*B:与DISKCOPYA:B:B)COPYABC.TXT+XYZ.TXT与TYPEXYZ.TXT>>ABC.TXTC)COPYABC.TXT+XYZ.TXTXYZ.TXT与COPYXYZ.TXT+ABC.TXTD)TYPE*.FOR>CON与COPY*.FORCON20.设C盘目录结构如下:C:根目录────┬───DOS子目录├────TC子目录─────TC.EXT├────FORTRAN子目录────USER子目录└────AUTOEXEC.BAT且C盘根目录下文件AUTOEXEC.BAT的内容为:CDFORTRANCDTC如果在A驱动器中插入一张根目录中只有扩展名为.C的若干个文件(即A盘中无DOS系统文件)的软盘片，则由C盘启动DOS系统后，第一次键入的下列命令中，正确的是________。A)COPYA:*.CB)COPYA:*.CTCC)COPYA:*.CFORTRAND)CDnUSER21.在BASIC状态下，删除磁盘上文件的命令是________。A)DELETEB)DELC)CLEARD)KILL22.下面四个哪一个是BASIC语言中数值常数?A)XYB)E+3C)FALSED)5#23.在BASIC状态下，6个关系运算符>，=，<，>，>=，<=优先级最高的是________。A)>B)=C)无先后之分D)<>24.下列的逻辑表达式中其值为"真"的是________。A)"A">"a"B)"THAT">"THE"C)9>"H"D)"b">"B"25.下面四个表达式中其值为0的是________。A)4/5B)5MOD4C)45D)4MOD526.下面四组READ/DATA语句中错误的是________。A)10READA，B$，C$B)10READA，B$，C20DATA12，3.14/180，2320DATA34，PI/180，45C)10READA，B$，C$D)10READA，B$，C2ODATA45，56+67，X20DATA78，PI，X27.表达式5#(7MOD3)*1/2的值是________。A)2.5B)5C)0.5D)50.528.语句10DIMAA(12，8)定义的数组有多少个元素_________。A)20B)96C)117D)12829.下面程序执行的结果是________。10A=123:B=45620C=LEN(STRS(A)+STRS(B))30PRINTnC40ENDA)123456B)579C)6D)830.下面程序运行时内层循环的循环总次数是________。10FORM=1TO320FORN=0TOM-130NEXTN40NEXTM50ENDA)6B)5C)3D)431.下面程序运行时输出的结果是________。10DEFFNA(X，Y，Z)=X*Z+7*X+Y+Z20X=3:Y=4:Z=530PRINTFNA(Z，X，Y)40ENDA)62B)59C)49D)4332.表达式ABS(-5)+LEN("ABCDEFGH")的值是________。A)5ABCDEFGHB)-5ABCDEFGHC)13D)333.执行PRINTUSING"$$####.###";876.54的结果是________。A)$876.54B)$$876.54C)$876.540D)$876.5434.下面程序运行时输出的结果是__________。10OPTIONBASE120FORJ=0TOn1030READA(J)40NEXTJ50PRINTA(0)60DATA1.88，2.55，3.66，6.66，8，77，90.6，0.0，36.5，55.5，070ENDA)1.88B)55.5C)0D)显示出错信息35.下面程序运行后，输出值是________。10A=11:B=1520X=A-B30IFA>BTHENX=A+B40PRINTX50ENDA)-4B)5C)9D)436.下面程序运行时输出的结果是________。10RESTORE5020READX，X，X$30PRINTX$40DATA1，2，350DATA4，5，660ENDA)显示出错信息B)"6"C)3nD)637.下面程序运行时输出的结果是________。10C=020READD30WHILED<>-999940IFD>CTHENC=D50READD60WEND70DATA9999，9，8，3，-999980PRINTC/D90ENDA)1B)-9999C)-1D)999938.下面程序运行后，输出的值是________。10J=120WHILEJ<530J=J+140A=A+J*J50WEND60PRINTA70ENDA)5B)16C)29D)5439.下面程序运行时输出的结果是________。10FORX=5TO2.5STEP-720NEXTnX30PRINTX40ENDA)2.2B)2.5C)2.9D)-740.四个字符串"987654"，"B123"，"BASIC"，"dBASE"比较的结果最小的是________。A)987654B)B123C)BASICD)dBASE41.下面程序运行时输出的结果是________。10FORJ=5TO1STEP-220READA(J)30PRINTA(J)40RESTORE50NEXTJ60DATA1，3，5，7，970ENDA)1B)111C)1D)15942.下面程序运行后，输出XYZ的值是________。10DEFFNA(A)=A+120DEFFNB(A)=FNA(A+1)30A=140XYZ=FNB(FNA(FNB(A+1)))50PRINTXYZ60ENDA)6B)7C)5nD)843.下面程序运行时输出的结果是________。10B$=""20FORJ=1TO330READA$40B$+MID$(A$，J，J)50NEXTJ60PRINTB$70DATABALL，BOTHAUTOMATIONA)BALLB)AUTOMATIONC)BOTTOMD)BBOAUT44.下面程序运行时输出的结果是_________。10FORK=1TO320IFK<=1THENA=330IFK<=2THENA=240IFK<=3THENA=150PRINTA;60NEXTK70PRINTK80ENDA)1114B)3214C)3333D)123445.下面程序运行时输出的结果是________。10FORJ=1TO520nX$=SPACE$(J)30PRINTX$;J40NEXTJ50ENDA)1B)11C)11D)122222233333344444455555546.下面程序运行时输出的结果是________。10A$="*":B$="$"20FORK=1TO330X$=STRING$(LEN(A$)+K，B$)40PRINTX$;50NEXTK60PRINT70END47.下面程序运行时输出的结果是________。10K=1TO220GOSUB7030S=S+K40NEXTK50PRINTnS;K60END70K=K*(K+1)80S=690RETURNA)243B)83C)3024D)12748.下面程序运行后，输出的值是________。10L="X+":M$="Y":N$="Z"20FORJ=1TO230L$=M$:M$=N$:N$=L$40NEXTJ50PRINTL$+M$+N$60ENDA)ZXYB)YZXC)YZYD)ZYZ49.下面程序运行后输出的结果是________。10A=020FORM=1TO1030A=A+1:B=040FORJ=1TO1050A=A+1:B=B+260NEXTJ:NEXTM70PRINTA;B80nENDA)1020B)20110C)11020D)20011050.下面程序运行后屏幕上显示的是________。10CLS20X=100:Y=80:R1=100:R2=8030SCREEN1，0:COLOR540CIRCLE(X，Y)，R1-3050CIRCLE(R1，R2)，R2-3060ENDA)一个图B)二个同心圆C)二个不同心的圆D)无任何显示二、填空题(每空2分，共40分)请将每空的正确答案写在答题卡(1)至(20)序号的横线上，答在试卷上不得分。1.与八进制小数0.1等值的十六进制小数为(1)。2.DOS命令分为内部命令和外部命令，.SYS命令属于(2)。3.要打印输出当前盘当前目录下的所有扩展名为.DAT的文件内容，应用的DOS命令为(3)。4.设当前系统提示符为"C:USER>"，执行命令"PROMPT$P"后，系统提示符变为(4)。5.要建立当前盘当前目录下的全部文件与下一级子目录的目录信息文件MYDIR，应使用的DOS命令为(5)。6.数学式2sinx+3cosx+actan2x+lnxlny的BASIC表达式为(6)。7.执行下面程序后，输出结果是(7)。10X=9^2MOD4^33^220PRINT"X=";X30nEND8.下面程序运行时输出的结果是(8)。10K=120FORJ=1TO530K=K*J40NEXTJ50PRINTK+J60END9.下面程序运行后，输出的结果是(9)。10J=12.3:K=45.6:A$="J+K"20M$=A$+STR$(J+K)30PRINTM$40END10.下面程序运行后输出Y的值是(10)。10FORA=1TO520Y=130FORB=1TO1040FORC=1TO550X=X+160Y=Y+170NEXTC80NEXTB90NEXT100PRINTY110END11.下面程序运行输出J的值是(11)。10nX=220Y=RND(X)+430ONYGOTO50，60，7040J=J+150J=J+260J=J+370J=J+480PRINTJ90END12.下面是一个用子程序的方法求2!+3!+4!的值的程序，请把第240语句(12)处补充完整。10S=020FORT=2TO430GOSUB200:S=S+P40NEXTT50PRINT"2!+3!+4!=";S60END200P=1210FORM=1TOT220P=P*M230NEXTM240(12)13.下面程序运行后，输出的结果是(13)。10FORJ=1TO1520IFJMOD5<>0THENnA=A+J30NEXTJ40PRINTA50END14.阅读下面程序，该程序的作用是用随机函数RND(1)产生10个100-200之间(包含100和200)的随机整数，打印其中5的整数倍的数并求其总和.请根据程序的需要在第20行(14)处填上正确的内容。10FORM=1TO1020X=(14)30PRINTX;40IF(XMOD5=0)THENPRINTX:K1=K1+X50NEXTM60PRINT70PRINT"K1=";K180END15.下面程序运行后，输出的结果是(15)。10FORJ=1TO1020A(J)=2*J30B(J)=A(J)*240NEXTJ50PRINTB(J/2+0.1)60END16.下面程序运行后输出的结果是(16)。10FORJ=1TO320READA$30nA$=MID$(A$，J，J)40C$=C$+A$50NEXTJ60PRINTC$70DATASAY，MECHANIC，NOONDAY80END17.下面程序的作用是打开一个随机文件，读入20个记录，并将它们打印出来，请把第30行(17)处补充完整。10DIMA(20)，B(20)，C(20)20OPEN"ABC.DAT"AS#1LEN=830(17)，8ASD$40R&=150FORM=1TO2060GET#1，R%:A(M)=CVD(D$):R%=R%+170GET#1，R%:B(M)=CVD(D$):R%=R%+180GET#1，R%:C(M)=CVD(D$):R%=R%+190NEXTM100CLOSE#1110FORM=1TO20120PRINTA(M)，B(M)，C(M)130NEXTM140nEND18.在磁盘A的根目录中有一个名为SCOR.DAT的文件，内容为姓名，英语成绩，物理成绩，数学成绩，现依此文件再在根目录中建一个名为AVER，DAT的文件，内容为姓名及三门课的平均成绩，但程序不完整，请在第20行(18)处补充之。10OPEN"A:SCOR.DAT"FORINPUTAS#320OPEN"A:AVER.DAT"FOR(18)AS#230WHILENOTEOF(3)40INPUT#3，NA$，ENG，PHY，MATH50WRIT#2，NAS，(ENG+PHY+MATH)/360WEND70CLOSE#3，#280END19.下面程序运行后输出X的值是(19)。10READA，B，C，D20X=B+D30RESTORE13040READA，B，C，D50Y=B+D60RESTORE70FORJ=1TO880READA90NEXTJ100X=X+Y+A110PRINTX120DATA1，1，1130DATA2，2，2140DATAn3，3，3150END20.有一列数，第一个数，第二个数分别为1，2其后每一个数均是前二个数之和，下面程序是打印出此数列，使每个数都不超过32767，但程序不完整，请在第60行(20)处补充完整。10A=1:B=220PRINTA30WHILEB<3276740PRINTB，50C=A+B:A=B60B=(20)70WEND80END97年9月全国计算机等级考试二级笔试试题基础知识与BASIC程序设计(考试时间120分钟，满分100分)一、选择题((1)-(40)每个选项1分，(41)-(50)每个选项2分，共60分)1.D2.D3.A4.B5.B6.A7.D8.B9.C10.C11.D12.B13.B14.D15.C16.B17.C18.B19.B20.A21.D22.D23.C24.D25.C26.D27.A28.C29.D30.A31.A32.C33.C34.D35.A36.D37.C38.D39.A40.A41.A42.B43.C44.A45.A46.D47.B48.D49.C50.B二、填空题(每空2分，共40分)1.0.2或(0.2)162.外部命令(答外部不扣分)3.COPY*.DATPRN4.C:USER5.DIR>MYDIR6.2*SIN(X)+3*COS(X)+ATN(2*X)+LOG(X)*LOG(Y)7.X=48.1269.J+K57.910.6111.1012.RETURN13.9014.INT(RND(1)*101)+100或INT(RND(1)*101+100)15.2416.SECOND17.FIELD#118.OUTPUT19.1120.Cn1998年4月全国计算机等级考试二级BASIC笔试试题一、选择题((1)-(40)每个选项1分,(41)-(50)每个选项2分,共60分)下列各题A)、B)、C)、D)四个有选项中,只有一个选项是正确的,请将正确选项涂写在答题卡相应位置上,答在试卷上不得分。(1)通常所说的主机主要包括A)CPUB)CPU和内存C)CPU、内存与外存D)CPU、内存与硬盘(2)在微机系统中,最基本的输入输出模块BIOS存放在A)RAM中B)ROM中C)硬盘中D)寄存器中(3)一个24*24点阵的汉字字形信息所占的字节数为A)2B)24C)32D)72(4)bit的意思是A)字B)字长C)字节D)二进制位(5)某学校的工资管理程序属于A)系统程序B)应用程序C)工具软件D)文字处理软件(6)与十六进制数BB等值的十进制数是A)187B)188C)185D)186(7)设一张软盘已染上病毒，能清除病毒的措施是A)删除该软盘上的所有文件B)格式化该软盘C)删除该软盘上的所有可执行文件C)删除该软盘上的所有批处理文件(8)一张3.5英寸双面高密度软盘片的容量为A)360KBB)720KBC)1.44MBD)1.2MB(9)与二进制小数0.1等值的十六进制小数为A)0.1B)0.2C)0.4D)0.8(10)DOS系统的热启动与冷启动的不同之处为热启动时A)不检测键盘、处设接口与内存B)不提示用户输入日期与时间C)不用装入COMMAND.COM文件D)不能从软盘启动n(11)为了将磁盘上的文件K1,K2,K3,依次连接在文件K4的后面,应使用命令A)COPYK1+K2+K3K4B)COPYK1+K2+K3+K4C)COPYK1+K2+K3+K4K4D)COPYK4+K1+K2+K3(12)下列文件名中可以作为批处理文件名的是A)AUTOEXEC.CB)AUTOEXECC)ATX.BATD)AUTO.TXT(13)要打印输出当前盘的根目录下所有文件与子目录清单,应使用命令A)DIR>PRNB)TYPE>PRNC)DIR>PRNC)TYPE>PRN(14)设可执行文件ABC.EXE所需要的本该由键盘输入的数据已经按格式存放在文件XYZ中,并要求执行结果放在文件XYZ中输入数据的后面.下列命令中正确的是A)ABCXYZB)ABC>XYZC)ABCXYZD)ABC>>XYZ(15)设当前盘中某一目录路径为ABC,当前目录为A.下列命令中肯定出错的是A)MDACB)CDC)MDABAD)MDAB(16)设A盘的目录结构如下:根目录ABCD1子目录DX.CQ.DATD2子目录A.FORB.PASD3子目录Y.BASA.CA1.CD4子目录XYZ.CQR.CNA.CA.TXTB.C如果当前盘为C盘,A盘的当前目录为D2,则下列对A盘上文件QR.C的指定中,合法的是A)D2D4QR.CnB)D4QR.CC)A:D4QR.CD)A:D2D4QR.C(17)下列DOS命令中,有错误的是A)TYPEAAB.FOR>CONB)TYPE?AB.FORC)COPY*.CCOND)COPYCONPRN(18)设当前盘为A盘,为了将当前盘当前目录下的文件AB1.TXT连接在C盘根目录下的文件XYZ.TXT的后面,正确的命令是A)COPYC:XYZ.TXT+AB1.TXTB)COPYAB1.TXT>>C:XYZ.TXTC)TYPEAB1.TXT>C:XYZ.TXTD)AB1.TXT+C:XYZ.TXT>C:XYZ.TXT(19)下列命令中合法的是A)DISKCOPYA:A:B)DISKCOPYA:C:C)DISKCOPYC:A:D)DISKCOPYC:D:(20)设当前盘中某一目录路径为ABCDXU,当前目录为A.要将根目录下扩展名为.C的所有文件复制到当前目录下,并将扩展名改为.FOR,应使用命令A)COPY*.C*.FORB)COPY*.CA*.FORC)COPY*.FOR*.CD)COPYA*.C*.FORwww.51test.net(21)在BASIC状态下要列出磁盘上的文件目录的命令是A)CATALOGB)DIRC)FILESD)LISTn(22)下列语句中语法正确的是A)X^3=5B)LETa=3,b=7C)A>B=2D)A=B<2(23)常量1.7653e-06的类型是a)整型b)实型c)字符型d)双精度(24)在basic语言中,y=5+SIN(3*X+1)是什么表达式a)算术表达式b)关系表达式c)逻辑表达式d)字符表达式(25)语句10dimaa(3,4,5)中定义的数组有多少个元素a)12b)60c)120d)345(26)表达式int(4*rnd+1)*(int(4*rnd-1))值的范围是a)[0,8]b)[-1,8]c)[-3,8]d)[-4,8](27)下面程序运行后输出的结果是10x=-17.820printsgn(x)*int(abs(x))30enda)-18b)-17c)17d)18(28)下面语句语法正确的是a)10a=1b=2c=3b)10a=1,B=2,C=3c)10a=1;B=2;C=3d)10a=1:B=2:C=3(29)下列表达式中不正确的是a)a+bb+cc)a(-3+2)d)a-b=C(30)表达式1.5+32>2OR7MOD3<4andnot1的运算结果为a)-1b)0c)1d)其他(31)下面程序运行后输出的结果是10x=3:Y=520printx=3;Y=530enda)35b)-1-1c)x=3y=5d)出错信息(32)下面程序运行后输出的结果是10reada,b$,c,d$20printa+c;b$+d$30webstripperattrwaswebstripperlinkwas=http://www.chinaschool.net/reeducate/com_grade/test/two/57,8,9,1040enda)1618b)16810c)1690d)其他(33)下面程序运行后输出的结果是10deffnx(l,m,n)=(M*L+8)N20a=3:B=4:C=530printfnx(b,a,c)40enda)4b)5c)7d)9(34)下面程序运行后输出的结果是10forj=1to1020readx30ifx<0thena=A+ABS(X)40nextj50printa60data1,-2,3,-4,5,-6,7,-8,9,-1070enda)-30b)-25c)25d)30(35)下面程序运行后输出的结果是10a$="CHINA"20b$=STRING$(3,A$)30printb$40enda)aaab)cccc)chid)ina(36)若a=3,B=6,下面程序运行后输出的结果是10input"a,b=";A,B"20c=A*B+530printtab(b);c40enda)23b)tab(6)23c)1823d)623(37)下面程序运行后输出的结果是10x=13:Y=1520a=X-Y30ifx>=YTHENA=A+YELSEA=A-Y40PRINTnA50ENDA)-2B)2C)13D)-17(38)下面程序运行后输出的结果是10READA,B,C,D20RESTORE30READE,F,G40DATA1,3,4,6,7,850DATA10,11,1260PRINTC;D;E;F;G70ENDA)46134B)467810C)78101112D)46101112(39)下面程序运行后输出的结果是10K=020WHILEK<7030k=K+240k=K*K+K50a=A+K60wend70printa80enda)64b)72c)78d)148(40)下面程序运行后输出的结果是10deffny(x)=X*X^2-3*X+120forj=1to530s=S+FNY(J)40nextj50prints60enda)164b)183c)185d)出错信息(41)下面程序运行后输出的结果是10FORK=106STEP-120READA(K)30NEXTK40DATAn1,3,5,7,950FORJ=3TO760PRINTA(10);70NEXTJ80ENDA)13579B)97531C)00097D)11111(42)下面程序运行后输出的结果是10FORJ=3TO620GOSUB10030SUM=SUM+K40NEXTJ50PRINTSUM60END100K=1110FORA=1TOJ120K=K*A130NEXTA140RETURNA)870B)130C)720D)721(43)-(45)下面程序是打印出100个在-600到600间不同的随机整数,并找出第几个最小者,但程序不完整，请补充之.10DIMnB(100)20FORJ=1TO10030X=RND:IFX>.5THENY=1ELSEY=-140B(J)=Y*INT(RND*601):P=0:K=150WHILEP=0ANDK<=j-160ifb(j)=B(K)then【43】70k=K+180wend:ifp=1thengoto3085printb(j);90nextj:print100p=1:min=【44】110forn=2to100120ifb(n)=1andp=060ifn>ARR(J)THENP=1ELSEARR(【46】)=ARR(J):J=J-170WEND80ARR(【47】)=N90FORK=1TO13:PRINTARR(K);:NEXTK:PRINT100DATA8,25,46,61,89,96,113,132,147,199,201,267110END【46】A)1B)12C)J-1D)J+1【47】A)1B)12C)J-1D)J+1(48)-(49)下面程序是用自定义函数计算,但程序不完整，请补充之。10DEF【48】20READA1,A2,B1,B230S=【49】40PRINT"S=";S50DATA4,5,6,760nEND【48】A)FNY(X1,2,Y1,2)=SQR(X2-X1)^2+SQR(Y2+Y1)^2B)FNY(X1,X2,Y1,Y2)=SQR((X2-X1)^2+(Y2-Y1)^2)C)S=SQR((X2-X1)^2)+(Y2-Y1^2)D)FNY=SQR((X2-X1)^2+(Y2-Y1)^2)【49】A)FNY(A1,2,B1,2)B)FNY(X1,2,Y1,2)C)FNY(A1,A2,B1,B2)D)FNY[X1,X2,Y1,Y2](50)下面程序是在键盘上输入任一个二进制数,即能转换为十进制数。但程序不完整，请补充之。10INPUT"Inputabinarynumber-";B$20M=LEN(B$)30FORJ=1TOM40DEC=DEC*2+【50】(MID$(B$,J,1))50NEXTJ60PRINT"Thedecimalnumberis";DEC70ENDA)ABSB)INTC)SGND)VAL二、填空题（每空2分，共40分）请将每空的正确答案写在答题卡1至20序号的横线上，答在试卷上不得分。(1)自动批处理文件名为1。(2)DOS命令分为内部命令与外部命令，COMP命令属于2命令。(3)设当前盘为Ｃ盘，现要用一条DOS命令在打印机上输出Ａ盘当前目录下所有扩展名为.DAT的文件内容。这一条DOS命令应为3。(4)要将当前盘当前目录下的子目录XYZ中所有扩展名为.BAK的文件名改成扩展名为.FOR，应使用的DOS命令为4n。(5)设DOS外部命令文件所在的路径均已用PATH命令打通。现要将当前盘当前目录下的文件WST.TXT设置为只读属性，应使用的DOS命令为5。(6)数学式2sin(2x)+ln(2x)ln(3x)的BASIC表达式为6。(7)表达式11+41mod9^22^2+12+5^2mod23*373/2^3+1的值为7。(8)"a","n","x","Z"这四个字符中哪一个的ASCII码最小8。(9)下面程序运行后输出的结果是9。10FORJ=6TO920A=A*10+J30NEXTJ40PRINTA50END(10)下面程序运行后输出的结果是10。10FORJ=1TO820READX:A=A+X:NEXTJ30RESTORE9040READX,Y:A=A+X+Y50RESTORE60READZ:A=A+X+Y+Z70PRINTA80DATA9,8,790DATA6,5,4100DATA3,2,1110END(11)下面程序运行后输出的结果是11n。10Y=10:J=120Z=INT(RND(Y)+2)30ONZGOTO50,60,7040J=J+150J=J+360J=J+570J=J+780PRINTJ90END(12)下面程序运行后输出的结果是12。10X=020FORJ=1TO830X=X+1:Y=040FORK=1TO950X=X+1:Y=Y+160NEXTK:NEXTJ70PRINTX;Y80END(13)下面程序运行输出的结果是13。10AA$="43.2":BB$="98.7"20CC$=AA$+BB$30nDD=VAL(CC$)40PRINTDD50END(14)下面程序运行后输出的结果是14。10FORJ=1TO1020READX30IFX>YTHENA=A+X:Y=XELSEA=A+Y40NEXTJ50PRINT"A=";A60DATA5,3,11,18,9,16,25,40,11,2270END(15)下面程序运行后输出的结果是15。10FORJ=1TO320FORK=1TO330A(J,K)=(J-1)*3+K40NEXTK50NEXTJ60FORJ=2TO370FORK=1TO280PRINTA(K,J);90NEXTK100NEXTJ:PRINT110nEND(16)下面程序运行后输出的结果是16。10AA=0:BB=120FORJ=1TO530AA=AA+BB:BB=BB+AA40NEXTJ50PRINTAA;BB60END(17)下面程序运行后输出的结果是17。10BB$="Invitingafriendtodinner"20M=LEN(BB$)30FORJ=1TOM40B$=MID$(BB$,J,1)50IFB$="n"THENX=X+160NEXTJ70PRINTX80END(18)下面程序运行后输出的结果是18。10A$=""20FORJ=1TO330READB$40A$=A$+LEFT$(B$,J)50NEXTnJ60PRINTA$70DATAhome,once,establish80END(19)下面程序运行后输出的结果是19。10DIMA(50)20WHILEJ<=1030j=J*J+140a(j)=J/250wend60printa(5)70end(20)下面程序运行后输出的结果是20。10DIMA(3,3)20FORJ=1TO330FORK=1TO340IFJ=KTHENA(J,K)=350IFJKTHENA(J,K)=970NEXTK:NEXTJ80FORJ=1TO390FORK=1TO3100PRINTA(J,K);110NEXTK120NEXTJ130END;www.51test.netn-----------------------------------------------------------------------1998年9月二级笔试试题BASIC答案一、选择题((1)-(40)每个选项1分,(41)-(50)每个选项2分,共60分)www.51test.net12345678910BBDDBABCDA11121314151617181920DCABDCBAAA21222324252627282930CDBBCDBDCA31323334353637383940BBADBADACC41424344454647484950DABBBDDBCD二、填空题（每空2分，共40分）1、AUTOEXEC.BAT2、外部（答外部命令不扣分）3、COPYA:*.DATPRN(在COPY后面与A:*.DAT后面都至少有一个空格)4、RENXYZ*.BAK.FOR或RENAMEXYZ*.BAK*.FOR(在REN或RENAME后面与XYZ*.BAK后面都至少有一个空格)5、ATTRIB+RWST.TXT或ATTRIBWST.TXT+R6、2*SIN(2*X)+LOG(2*X)+LOG(3*X)n7、298、Z9、678910、7511、1312、80913、43.29814、A=22015、253616、558917、518、honest19、2.520、3669369931999年4月全国计算机等级考试二级BASIC笔试试题一、选择题(1--40题每题1分，41--50题每题2分，共60分)(1)微型计算机的性能主要取决于A)内存B)中央处理器C)硬盘D)显示卡(2)有一个数值152,它与十六进制数6A相等，那么该数值是A)二进制数B)八进制数C)十进制数D)四进制数(3)使用超大规模集成电路制造的计算机应该归属于A)第一代B)第二代C)第三代D)第四代(4)已知英文字母a的ASCII代码值是十六进制数61H,那么字母d的ASCII代码值是A)34HB)54HC)24HnD)64H(5)一片存储容量是1.44MB的软盘，可以存储大约140万个A)ASCII字符B)中文字符C)磁盘文件D)子目录(6)在MS--DOS环境中同时按下[Ctrl]和[Break]两个键，其作用是A)终止当前操作B)暂停当前操作C)关机D)热启动(7)将二进制数10000001转换为十进制数应该是A)127B)129C)126D)128(8)磁盘处于写保护状态，那么磁盘中的数据A)不能读出，不能删改，也不能写入新数据B)可以读出，不能删改，也不能写入新数据C)可以读出，可以删改，但不能写入新数据D)可以读出，不能删改，但可以写入新数据(9)微型机启动后，DOS提示符是C:、》，现提示符变为C:、USER》，则说明刚执行过命令A)PROMPTB)PROMPTUSERC)PROMPT$P$GD)CDUSER(10)MS--DOS文件系统目录的组织形式属于A)关系型结构B)网络型结构C)树型结构D)直线型结构(11)应用软件系统TH的总容量大约1MB,其主要程序文件存放在C:、TH目录中，而数据文件存放在C:、TH、DATA目录中。如要将它们完整地复制到A盘，应该使用命令A)XCOPYC:、THA:、B)XCOPYC:、THA:、/SC)XCOPYC:、THA:、/MD)XCOPYC:、THA:、/P(12)执行COPYA.TXTB.TXT这个DOS命令后，得到的磁盘文件是A)A.TXTB)B.TXTC)AB.TXTD)AB.TXT(13)在WINDOWS中，将一个应用程序窗口最小化之后，该应用程序A)仍在后台运行B)暂时停止运行C)完全停止运行D)出错(14)CD--ROM属于A)感觉媒体B)表示媒体C)表现媒体D)存储媒体(15)在因特网(Internet)中，电子公告板的缩写是A)FTPB)WWWC)BBSD)E--mail(16)进入QBASIC操作环境，它提供______个窗口。A)1B)4C)3D)2(17)在QBASIC中，下面四个数中，作为常量有语法错误的是A)123.456#B)1234！C)1.23D--23D)1.89E1.1(18)在QBASIC中，12345678&的类型是A)整数型B)长整数型C)字符常数D)双精常数(19)下面变量名不合法的是A)a2(2,4)B)abcdC)a$xD)CdE(20)DIMa1020(10To20)所定义的数组元素个数是A)11B)20C)30D)10(21)在QBASIC语言中，行号或标号的作用是表明A)执行程序的顺序B)程序编排的顺序C)转移指向的标志D)无作用(22)QBASIC中，执行下面的四个语句时出现错误的是A)x=SGN(0)B)x=SQR(0)C)x=LOG(0)D)x=SIN(0)(23)在QBASIC程序中，一行中多于一个语句时，语句间的分隔符是A)空格B)，C)：D)；(24)下面的四个QBASIC逻辑表达式语法正确的是A)a》b.and.b《》cB)a》bcC)a》bAND《》cD)a》bANDb《》c(25)在QBASIC中下面的四组READ、DATA语句，语法上错误的是A)READxx,yy,zz$B)READxx$，yy$，zz$DATA11,22,33DATA11,22,33C)READxx$，yy$，zz$D)READnxx,yy,zzDATAaa,bb,ccDATAaa,bb,cc(26)在QBASIC中下面的四个数组说明语句语法正确的是A)DIMa[10]B)DEFfn(10)C)DIMa(10)D)DIMENSIONa(10)(27)语句PRINT“25*40”输出的结果是A)“25*40”B)出现错误信息C)25*40D)1000(28)在第20行第5列输出一个字符所用的定位语句是A)LOCATE20,5B)COL5,ROW20C)LINE20,COLUMN5D)LOCATE5,20(29)正确的单行自定义函数语句是A)DEFab(x,y)=a^3b^2B)DEFINEfnxy()=x^3y^2C)DEFfna(x,y)=x^3y^2D)DEFfn(x,y)=x^3y^2(30)表达式INT(RNI*11)100的值的范围是A)[11,110]B)[100,110]C)[11,100]D)[0,100](31)有如下程序a=1b=2c=3a=bb=cc=aPRINTa;b;cEND运行后输出的结果是A)123B)231C)232D)223(32)有如下程序a=3b=4PRINTa=bEND运行后输出的结果是A)0B)3C)4D)显示出错信息(33)有如下程序FORm=1TO3FORj=1TOmFORk=jTO3n=n1NEXTkNEXTjNEXTmEND运行后n的值为A)3B)14C)9nD)21(34)有如下程序a$=“12”b$=“34”c$=a$b$d=VAL(c$)PRINTd、10END运行后输出的结果是A)12B)34C)46D)123(35)有如下程序a=12.3b=--123m=LEN(STR$(a)STR$(b))PRINTmEND运行后输出的结果是A)9B)5C)7D)8(36)有如下程序FORj=1TO15a=ajMOD3NEXTjPRINTaEND运行后输出的结果是A)1B)15C)90D)120(37)要将x,y两个变量的值互换，正确的语句是A)SWAPx,yB)SHIFTx,yC)xSWAPyD)CHANGEx,y(38)有如下程序DEFSTRA--Ba$=“123”b=“456”c=VAL(a$)VAL(b)PRINTcEND执行后输出的结果是A)123B)显示出错信息C)“579”D)579(39)有如下程序a$=“Bird”：c$=“fly”PRINTa$“can”c$“！”END运行后输出的结果是A)Birdcanfly！B)Birdcanfly！C)Birdcanfly！D)“Birdcanfly！”(40)有如下程序FORx=1TOn2a=0FORy=1TOx1a=a1NEXTyPRINTa;NEXTxEND运行时输出的结果是A)11B)00C)12D)23(41)有如下程序DEFfna(x,y)=x*y3*yx、yx=4y=3PRINTfna(y,x)END运行时输出的结果是A)22B)23C)24D)22.33(42)有如下程序n$=“nnnnn”MID$(n$，2,2)=“NN”RPINTn$END运行输出n$的结果是A)NNB)nNNnnC)nnNND)NnnNN(43)有如下程序FORj=1TO10READaIFa/3=a、3ORa/5=a、5THENsum=sumaNEXTjPRINT“sum=”；sumDATA19,17,15,13,11,9,7,5,3,1END运行时输出sum的值是A)27B)15C)32D)20(44)执行PRINTUSING“###。##%”；123.456的结果是A)123.456%B)123.46C)123.46%D)123.45%(45)有如下程序sum=0FORj=1TO10IFj=10THENELSEsum=sumjENDIFNEXTjPRINTnsumEND运行时输出的结果是A)45B)55C)显示错误信息D)36(46)有如下程序s=0DOs=(s1)*(s2)number=number1LOOPUNTILs》=30PRINTunmber;sEND运行输出的结果是A)01B)3030C)430D)3182(47)有如下程序m=1FORk=3TO1STEP--1x$=STRING$(k,“*”)PRINTm;x$m=m1NEXTkEND运行后输出的是A)1*B)1*C)3*D)1***2**2*2**2**3***3*1***3*(48)有如下程序DECLARESUBf(k,s)total=0FORk=2TO4CALLf(k,s)total=totalsNEXTkPRINTtotalENDSUBf(k,s)s=1FORm=1TOks=s*mNEXTmENDSUB运行时输出的结果是A)9B)32C)6nD)8(49)有如下程序score=INT(RND*10)80SELECTCASEscoreCASEIS《60a$=“F”CASE60TO69a$=“D”CASE70TO79a$=“C”CASE80TO89a$=“B”CASEELSEa$=“A”ENDSELECTPRINTa$END运行时输出的结果是A)AB)BC)CD)D(50)有如下程序CLS:SCREEN13:COLOR3RANDOMIZETIMERx0=160:y0=100FORj=1TO5IFRND》。5THENa=1ELSEa=--1IFRND》。5THENb=1ELSEb=--1x=a*INT(RND*505)：y=b*INT(RND*405)r=INT(RND*405)：c=INT(RND*151)a:CIRCLE(x0x,y0y)，_____,cNEXTjEND该程序要完成的功能是画出五个不同颜色，不同大小，不同位置的圆。应在标号为a的语句之空白处加入的正确内容是A)x0B)y0C)rD)a二、填空题(每空2分，共40分)请将每一个空的正确答案写在答题卡1至20序号的横线上，答在试卷上不得分。(1)DOS中的自动批处理文件的全名是____1____(2)在DOS启动盘中，除COMMAND.COM外，还有两个必备的系统文件，它们是MSDOS.SYS(或IBMDOS.COM)与____2____(3)在DOS下，要将当前目录中AB.TXT文件设置为只读属性，应该使用的完整命令行是___3___(4)在DOS下，要查看当前目录中所有批处理文件的总字节数，应该使用的完整命令行是___4____(5)计算机病毒除有破坏性。潜伏性和激发性外，还有一个最明显的特性是___5____(6)数学式的QBASIC表达式____6____(7)在QBASIC程序中定义全局变量ab的语句是___7___(8)表达式25nMOD(1--2^3)的值为____8____(9)四个字符串“ABC”。“abc”。“ABCDE”及“afgh”中的最大者为___9____(10)下面程序运行后的输出结果如下：DCDBCDABCD但程序不完整，请在___10___处补充使之完整a$=“ABCD”FORm=1TO4PRINTTAB(5--m)；____10____NEXTmEND(11)下面一段程序定义了一个记录，包括nam.age及wage三个域，但程序不完整，请在__11___处补充使之完整。TYPEemployernamASSTRING*12ageASINTEGERwageASINTEGER_____11_____(12)下面程序运行后的输出结果是___12___k=1FORj=2TO5k=k*jNEXTjPRINTkjEND(13)下面的程序是用选择交换法将10个数排成升序，请在___13___、___14___、___15___处将程序补充完整。OPTIONBASE1n=10DIMarray(n)PRINT“databeforesorting:”FORi=1TO10READarray(i)：PRINTarray(i)；NEXTiDATA123,96,42,39,22,14,7,4,0,--7PRINTFORi=___13___k=iFORj=___14___IFarray(k)》array(j)THEN____15____NEXTiIFk《》iTHENSWAParray(k)，array(i)NEXTniPRINT“dataaftersorting:”FORi=1TO10PRINTarray(i)NEXTiPRINTEND(14)下面程序运行后输出的结果是___16___FORa=1TO5y=1FORb=1TO5FORc=1TO5y=y1NEXTcNEXTbNEXTaPRINT“y=”；yEND(15)下面程序的作用是利用随机函数产生10个100--200之间(包含100.200)的随机整数，打印其中7的倍数的数并求出它们的总和。请根据程序的需要在__17__.__18__.___19___三处填上正确的内容。RANDOMIZETIMERFORm=1TO10x=INT(RND*___17___)IF___18___THENPRINTx;k1=k1X___19___NEXTmPRINTPRINT“k1=”；k1END(16)下面程序运行后输出的结果是___20___FORj=1TO3READa$st$=st$LEFT$(a$，j)NEXTjPRINTst$DATAsum,echo,ondometerEND-------------------------------------------------------------------------------1999年4月二级笔试试题BASIC答案n一.选择题(1-40题每题1分,41-50题每题2分,共60分)(1)B(2)B(3)D(4)D(5)A(6)A(7)B(8)B(9)D(10)C(11)B(12)A(13)A(14)D(15)C(16)D(17)D(18)B(19)C(20)A(21)C(22)C(23)C(24)D(25)D(26)C(27)C(28)A(29)C(30)B(31)C(32)A(33)B(34)D(35)A(36)B(37)A(38)D(39)C(40)D(41)C(42)B(43)C(44)C(45)A(46)D(47)D(48)B(49)B(50)C二.填空题(每空2分,共40分)(以下各题答案,除第9.20空外,其余题答案中字母大小写均可)1>(1)AUTOEXEC.BAT2>(2)IO.SYS或IBMBIO.COM3>(3)ATTRIBAB.TXT+R或ATTRIB+RAB.TXT4>(4)DIR*.BAT或DIR*.BAT/P或DIR*.BAT/W或DIR*.BAT/P/W或DIR*.BAT/W/P5>(5)传染性或传播性6>(6)SQR(x+COS(LOG(y))+EXP(x))7>(7)COMMONSHAREDab8>(8)49>(9)"afgh"或者afgh10>(10)RIGHT$(a$,m)或MID$(a$,5,-m,m)11>(11)ENDTYPE12>(12)12613>(13)1TOn-1或1TO9(14)i+1TOn或i=1TO10(15)k=j14>(16)2615>(17)101+100(18)xMOD7=0或者INT(x/7)=x/7或者x/7=/7(19)ENDIF16>(20)second