VFP读程序选择题.doc

读下列程序：CLEARSTORE1TOI,JDOWHILEJ=1DISPLAYSKIP-1WAITN=N-1ENDDOUSERETURN（1）程序的功能是（D）（A）显示所有记录（B）分别显示前3个记录（C）显示第3个记录（D）分别显示后三个记录（2）退出循环后，N的值是（A）（A）0（B）1（C）3（D）4第9题、阅读下面程序INPUT输入年龄TONLDOCASECASANL7？童年CASENL18？少年CASENL=60？老年CASENL=35？中年OTHER？青年ENDCASE由于设计不当，本程序运行结果不对(1) 运行时输入11，输出的结果是：B A)童年B)少年C)青年D)老年(2)运行时输入36，输出的结果是：B A)中年B)少年C)青年D)老年第10题、DIMEA(6)S=0FORK=1TO6INPUT请输入数据：TOA(K)S=S+A(K)ENDFORAV=S/6R=0FORK=1TO6IFA(K)AV?A(K)R=R+1ENDIFENDFOR?R(1) 若输入的数据分别是：123456，则显示的是(D) A)123B)234C)345D)456(2)？R的值是多少(B) A)2B)3C)4D)5第11题、读下列程序：*MAIPROGRAMCLEACLEARALLX1=工资-100Y1=200Z1=100DOSUB1?A处:,X1,Y1,Z1X1=1Y1=2 Z1=3DOSUB2WITHX1,Z1+10,10?C处:,X1,Y1,Z1CANCELPROCEDURESUB1PRIVZ1Z1=10X1=300Y1=2?B处:,X1,Y1,Z1Z1=1RETURNPROCEDURESUB1PRIVZ1Z1=10X1=300Y1=2?B处:,X1,Y1,Z1Z1=1RETURNPROCEDURESUB2PARAX1,Z1,Y1X1=X1+10Y1=Y1+10X1=X1+10RETURN（1）程序显示A处的X1，Y1，Z1值分别为_B_。A)300200100B)3002100 C)30020010D)300210（2）程序显示B处的的X1，Y1，Z1值分别为_D_。A)30020010B)300200100 C)3002100D)300210（3）程序显示C处的的X1，Y1，Z1值分别为_D_。A)212030B)21203 C)21230D)2123 二、读程序选择_1(本大题共4道小题，每小题分值6分，共24分。) 第7题、有学生信息表XS.DBF文件，其结构和记录如下：记录号学号姓名年龄性别入学日期出生地1Y001李明21男09/01/99重庆2Y002林雨20女09/01/99成都现有一程序段：DIMENSIONX(3)USEXSSCATTERTOXX(1)=A003X(2)=曾真X(3)=19APPENDBLANKGATHERFROMXLISTRETURN（1）运行结果X数组的数据元素的个数是_B_。 A)0个B)3个C)6个D)1个（2）LIST显示记录中，最后一条记录的姓名字段值是_D_。A)字段值为空B)林雨C)李明D)曾真 第8题、读下列程序：ClearStore1ToI,A,BDoWhileI=3DoProg1?P(+Str(I,1)+)=+Str(A,2)+,I=I+1Enddo?B=+Str(B,2)ReturnProcedureProg1A=A*2B=B+AReturn(1)程序的运行结果为（D）。（A）P（1）=2，P（2）=3，P（3）=4，b=15 （B）P（1）=2，P（2）=4，P（3）=6，b=8（C）P（1）=2，P（2）=4，P（3）=6，b=18 （D）P（1）=2，P（2）=4，P（3）=8，b=15（2）变量i的最终结果是(C) (A)3(B)5(C)4(D)6 第9题、阅读下面程序：CLEAROPENDATABASEemplorerUSEcompenSCANFORRECNO()=10IF姓名=李强LOOPENDIF?姓名，实发工资ENDSCANUSECLOSEDATABASE（1）compen是：（D）A自由表B数据库表数据库可能是自由表，也可能是数据库表（2）若数据库有50条记录，则程序的功能是：（D）A前10条记录中搜索李强的记录 B列出前10条记录C.每10条记录一屏显示记录，但不显示李强的记录 D.列出前条记录，但是不显示李强的记录 第10题、阅读下面程序：CLEAclearstore1toistore2toj,kdoa1?i=+str(i,2)+j=+str(j,2)+k=+str(k,2)proca1i=3*i+2privateii=2*j+k?i=+str(i,2)+j=+str(j,2)+k=+str(k,2)retuRETURN(1) 主程序中doa1后的显示语句显示结果为：（C）（A）i=6j=7k=2（B）i=5j=7k=2 （C）i=5j=2k=2（D）i=6j=8k=2(2)过程a1中的显示语句将显示：（D）（A）i=6j=7k=2（B）i=5j=7k=2（C）i=5j=8k=2（D）i=6j=2k=2第7题、CLEARCLOSEALLUSE学生COUNTTOXGOTOPFORI=1TOXIF性别=男DISPENDIFSKIPENDFORCLOSEALL(1)该程序的功能是：(C) A)显示一条男同学的记录B)显示一条女同学的记录C)显示所有男同学的记录D)显示所有女同学的记录(2)程序退出循环的条件是(C) A)记录指针指向文件尾B)记录指针指向文件头 C)循环次数大于表中记录条数D)循环次数小于表中记录条数 第8题、阅读下面程序：有图书数据表TS和订书单表DSD如下：TS：（书号：C3，单价：N6.2书名C10）书号单价书名00112.0计算机应用00210.0化学00315.0分析化学DSD：（班级：C6，书号：C3，数量：N3.0,款项：N7.2）记录号班级书号数量款项1化95.4001470.002数94.3002740.003物96.4003670.004生95.4002470.005地94.3001670.006物94.3002670.007数94.3001740.008化95.4003470.009数94.3003740.00程序：CLEAALLSELE1USETsALIASSHUINDEXon书号tagTSSHSELE2USEdsdaliasshdnSETRELATO书号INTOSHUREPLALL款项WITH数量shu.单价LISTDOWHIL.T.ACCE输入0退出TOBJIFBJ=0EXITENDIACCE输入书号TOSHLOCATFOR书号=SHDISP？书号+书号+str(款项)+元。ENDDcleaallRETURN（1）dowhile循环中locate操作的表是：（B）（A）数据表TS（B）数据表DSD（C）系统临时表aaa（D）系统临时表cursoraaa（2）运行时输入书号003，则输出为：_C（A）分别显示书号为003的所有款项 （B）显示书号为003的所有款项之和（C）显示书号为003的第一条记录的款 （D）输入错误，没有输出 第9题、读下列程序：&MAIN.PRGPUBLICX，YSETPROCTOKKX=20Y=50DOA1?X,YSETPROCTORETU*过程文件kk.prgProca1PrivatexX=30LocalyDoa2?x,yReturnProca2X=kkkY=mmmReturn第一次显示的X，Y的值是(B) A)KKK30B)KKK.F.C)KKK50D)30.F.第二次显示的X，Y的值是(B) A)2050B)20MMMC)3050D)30MMM 第10题、读程序：CLEARCLOSEALLSELE2USECJINDEXON学号TOXHSELE1USEXSSETRELATIONTO学号INTOBSETSKIPTOBreplaceb.成绩withb.成绩*1.1fora.姓名=王小平(1)在以上程序中(A) A)表CJ是子表B)表XS是子表C)表XS是主表也可以是子表D)无法确定(2)该程序的功能是B A)修改王小平的成绩为1.1分B)修改王小平的成绩为原成绩的1.1倍 C)修改字段名成绩为成绩1.1D)显示王小平的记录第11题、有以下三段程序*Main.PRGCLEAK1=10K2=20DOSuB?K1,K2&(1)DOSub1WithK2+10,K1?K1,K2&(3)RETUPROCSUBPRIVK1K1=K2+1K2=K1+1RETUPROCSub1PARAXl,x2X1=10X2=20X1=STR(X1,2)+STR(X2,2)X2=X1+STR(X2,2)?X1,X2&(2)RETU(1)程序运行到(1)处显示的结果是(D)(A)1020b)2030(C)1030(D)l022(2)程序运行到(2)处显示的结果是(B)A)1020102010(B)1020102020(C)1010101010(D)1020101010(3)程序运行到(3)处显示的结果是(D)(A)10101022(B)10202030(C)10202040(D)10202022第7题、I=0DOWHILEI10IFINT(I/2)=I/2I=I+3ENDIFI=I+2ENDDO?IRETU（1）上述程序执行后，共循环了_C_次。A)10B)5C)4D)死循环（2）上述程序执行后，屏幕显示为_B_。A)10B)11C)9D)13 第7题、读下列程序：k=1DOWHILEk=21k=k+2?STR(k,2)IFk=9EXITENDIFENDD（1）程序循环了多少次_A_。A)4B)3C)6D)5（2）程序执行的结果是_C_。A)1357B)2468 C)3579D)1234 第8题、读下列程序：CLEARFORK=1TO4A=$FORJ=1TOkA=A+STR(K,1)ENDFORK,5SAYAENDFORWAITRETURN（1）程序运行的结果是_B_。A)$1B)$1$22$22$122333$333$4444C)$122333D)$（2）程序运行到WAIT处，变量K与J的值分别是_D_A)1,1B)4,4C)4,1D)5,5 第9题、如下程序显示的结果是()。s=1i=0dowhilei8s=s+ii=i+2enddo?s(1)S的值为(D) A)10 B)11 C)12 D)13(2)程序循环次数为：(B) A)3 B)4 C)5 D)6 第10题、阅读下面程序：CLEAROPENDATABASEemplorerUSEcompenSCANFORRECNO()100?1CASEX200?2OTHERWISE?3ENDCASE(1)若在X=300的情况下执行这个程序段，屏幕上将显示A A）1B）2C）12D）3(2)输入下列什么数据时，屏幕上将显示字符3 A A）100B）200C）300D）400第7题、有如下教师授课表：教师号主讲课程t1101数据结构t1102C语言t1103网页制作t1104计算机网络t1105计算机网络t1105C语言t1105数据库下列程序段的输出结果是CLOSEDATAa=0USE教师GOTOPDOWHILE.NOT.EOF()IF主讲课程数据结构.OR.主讲课程C语言a=a+1ELSEDISPENDIFSKIPENDDO?a1 A A)3 B)4 C)5 D)6(2)命令DISP一共显示的记录条数是：A)3 B)4 C)5 D)6 第8题、读下列程序并进行判断。S=0I=1DoWhileI4Accept请输入字符串:ToXIfA$XS=S+1EndifI=I+1Enddo?SReturn(1)运行时输入abcd,ABCD,aBcD,输出S的值是(B)(A)2(B)1(C)3(D)4(2)运行时输入ABCD,ABcd,cdab,输出S的值是(C)(A)1(B)4(C)2(D)3第7题、如下程序显示的结果是()。s=1i=0dowhilei=1DISPLAYSKIP-1WAITN=N-1ENDDOUSERETURN（1）程序的功能是（D）（A）显示所有记录（B）分别显示前3个记录 （C）显示第3个记录（D）分别显示后三个记录（2）退出循环后，N的值是（A）（A）0（B）1（C）3（D）4读下列程序：USEGZ Y=Y DOWHILEY$YyCLEA ACCE请输入姓名TOXMINDEXON职称TOZXFOR姓名=ALLT（XM）L=3M=10DOWHILE.NOT.EOF() L,MGET姓名 L,M+20GET基本工资L=L+2SKIP ENDDOWAIT下一个（Y/N）？TOY ENDDO USE RETU（1）这个程序的功能是_B_。A)输入B)查询（C）修改（D）统计（2）程序中变量Y的作用是_A_。A)控制整个程序循环 B)把指针指向下一条 录C)等待 D)没有作用 第8题、已知proc.prg程序清单如下：（12）n=10t=15S=1M=0DOproc_1WITHnM=M+SDOproc_1WITHTM=M+S?MCANCproc_1.prg程序清单如下：PARAMETERSaS=1FORK=1TOAS=S*KENDFORRETURN(1)程序proc.prg的功能是(C)A）输出N和T的乘积B）输出N和T的阶乘C）输出N和T的阶乘之和D）输出N和T的值(2)在程序中变量S是(D) A)全局变量B)私有变量C)本地变量D)局部变量读程序clearuse学生locatefor入校总分=580dowhile.not.eof()dispcontinuenddo?结束Cancel(1)该程序的功能是：(B)A)显示表中一条入总分大于580分的学生记录B)显示表中所有入校总分大于580分的学生记录C)显示表中一条学生记录D)显示表中所有的学生记录(2)循环结束后，表中记录指针指向(B) A)文件头B)文件尾C)末记录D)首记录USEXSDAN=1XH=200201DOWHILEN=120APPENDBLANKREPL学号WITHSTR(VAL(XH)+N,6)N=N+1ENDDOUSECANCEL（1）上述程序数据库中，学号这个字段是_A_A)字符型B)数值型C)日期型D)逻辑型（2）该程序的功能是_D_。A)修改表文件的字段 B)修改表文件原有记录中学号字段的值C)增加表文件的字段 D)追加新记录并填充学号字段的值（3）程序运行到最后，变量N的值是_C_。A)1B)120C)121D)0现有表文件STUD.DBF，表中有：学号（C/6），姓名（C/8），性别（C/2），出生日期（D/8）等字段，并有记录若干条，根据已有的表文件运行下面程序：SET TALK OFFCLEARUSE STUDINDEX ON TRIM(姓名) TO ISTUDS=.T.DO WHILE SXM=SPACE(8)ACCEPT 请输入姓名: TO XMIF LEN(TRIM(XM)=0 EXITENDIFSEEK XMIF .NOT.EOF()3,10 SAY “学号”3,20 SAY 学号5,5 SAY “姓名”+姓名7,5 SAY “性别”+性别9,5 SAY “出生日期:” 9,20 SAY 出生日期ELSE20,3 SAY “没有找到该姓名的学生”S=.F.ENDIF WAIT ENDDO CANCEL（1）程序中的索引关键字和索引文件名分别为_B_。A) 学号, STUD.DBF B) 姓名,ISTUD.DBF C）学号, ISTUD.IDX D) 姓名,ISTUD.IDX（2）程序中用SEEK进行_C_查找。A) 顺序 B) 条件 C) 索引 D) 范围（3）执行EXIT命令的条件是_C_。A）输入姓名后直接按键 B) 未输入姓名就按键C) 输入姓名，又按空格键，再按键 D) 输入姓名为0后按键读下列程序： A=“Abcde”N=LEN(A)I=1DO WHILE I=NB=SUBSTR(A,I,1)IF ISLOW(B)B=CHR(ASC(B)-32)A=STUFF(A,I,1,B)ENDIFI=I+2ENDDO?ARETURN（1）程序运行的结果是_D_。A) abcde B) ABCDE C) abCdE D)AbCdE（2）程序循环的次数是_C_。 A) 5 B) 4 C) 3 D) 6读下列程序：USE 学生I=1FILEN=”DO WHILE I100? 1CASE X200 ? 2OTHERWISE? 3ENDCASE(1)若在X=300的情况下执行这个程序段，屏幕上将显示A A）1 B）2 C）12 D）3(2) 输入下列什么数据时，屏幕上将显示字符 3 A A）100 B）200 C）300 D）400读程序1、CLEARM=0 FOR X=1 TO 10 IF MOD(X,3)=0 M=M+X ENDIF ENDFOR ? M RETURN（1）该程序的功能是：求1到10之间B A. 能被3整除数的个数 B. 能被3整除数的和 C. 不能被3整除数的个数 D. 不能被3整除数的和（2）该程序执行的结果是：C A. 3 B. 10 C. 18 D. 37&MAIN.PRG &P1.PRG X1=1 PARA W1,W2 X2=2 PRIVATE W1 DO P1 WITH X1,X2 W1=W1*3 ?X1=+STR(X1,1) W2=W2*4 ?X2=+STR(X2,1) RETURN X1=1 X2=2 DO P1 WITH X1,X1+X2 ?X1=+STR(X1,1) ?X2=+STR(X2,1) RETURN （1）第一次显示X1，X2的值是B A 1 , 8 B 3 , 8 C.1 , 1 D.8 , 8（2）第二次显示X1，X2的值是C A 1 , 2 B 3 , 1 C 3 , 2 D.1 , 3 CLEAR DIME A（20） P=1 FOR N=1 TO 20 INPUT“请输入数据：“ TO A(N) ENDFOR FOR L=1 TO 19 FOR M=L+1 TO 20 IF A(L)=A(M) T=A(L) A(L)=A(M) A(M)=TENDIF ENDFOR ?A(I)ENDFOR程序完成的功能是将20个数组元素值A A 排序后按从大到小的顺序输出 B 排序后按从小到大的顺序输出C倒序输出 D. 按自然顺序输出将DIME A（20）改成 DIME A（10）后，B A出现“数组重复定义”的错误B出现“数组下标越界”的错误 C程序功能不变，只是输出10个数组元素值D程序功能不变，仍然输出20个数组元素值CLEARCLOSE ALLUSE 学生SCAN IF性别=男DISPENDIFN=N+1ENDSCAN？NCLOSE ALLCANC (1) D A)该程序显示一条男同学的记录 B) 该程序显示一条女同学的记录C) 该程序显示全班同学的记录 D) )该程序显示全班男同学的记录(2) 命令？N 显示的是C A)男同学的记录个数 B)女同学的记录个数C)全班同学的记录个数 D) 无法确定USE SBSORT TO RQX ON 启用日期/D FIELDS 编号，名称，启用日期 FOR NOT 主要设备USE RQXLIST USE SB SORT TO BMX ON 部门/D，价格 FOR 主要设备USE BMXLIST RETURN （1）程序执行到第一个LIST命令时，输出结果是C（A）将主要设备按编号，名称，启用日期分别升序排序。（B）将主要设备按编号，名称，启用日期分别降序排序。 （C）将非主要设备按启用日期降序排序。（D）将非主要设备按启用日期升序排序。 （2）程序执行到第二个LIST命令时，输出结果是B （A）将主要设备按部门升序排序，当部门相同时，按价格降序排序。（B）将主要设备按部门降序排序，当部门相同时，按价格升序排序。（C）将主要设备按部门降序排序，当部门相同时，按价格升序排序。（D）将主要设备按部门升序排序，当部门相同时，按价格降序排序。共有3个数据库文件TB1.DBF, TB2.DBF, TB3.DBF,下面程序功能是把每个库文件的末尾记录删掉。阅读下面的程序，将程序填写完整。N=1DO WHILE N=3 TB=“TB“+STR(N，1) USE &TB GO BOTTOM DELETE PACK N=N+1ENDDO该程序的功能是B （A）将数据表的末记录作物理删除 （B）将数据表的末记录作逻辑删除（C）将数据表的首记录作物理删除 （D）将数据表的首记录作逻辑删除该程序一共删除了()表中的记录C （A）1个 （B） 2个 （C）3个 （D）4个阅读下面程序： 有图书数据表TS和订书单表DSD如下：TS：（书号：C3， 单价：N6.2 书名C10） 书号 单价 书名 001 12.0 计算机应用 002 10.0 化学 003 15.0 分析化学DSD：（班级：C6，书号：C3 ，数量：N3.0, 款项：N7.2） 记录号 班级 书号 数量 款项 1 化95.4 001 47 0.00 2 数94.3 002 74 0.00 3 物96.4 003 67 0.00 4 生95.4 002 47 0.00 5 地94.3 001 67 0.00 6 物94.3 002 67 0.007 数94.3 001 74 0.008 化95.4 003 47 0.009 数94.3 003 74 0.00程序：CLEA ALLSELE 1USE Ts ALIAS SHUINDEX on 书号 tag TSSHSELE 2USE dsd alias shdnSET RELA TO 书号 INTO SHU REPL ALL款项 WITH数量shu .单价 LIST DO WHIL .T. ACCE “输入0退出” TO BJ IF BJ =0 EXIT ENDI ACCE“输入书号” TO SH LOCAT FOR 书号=SH DISP ENDI ？“书号”+书号+str(款项)+”元。” ENDD clea all RETURN （1）do while循环中locate操作的表是：B A数据表TS B数据表DSD C系统临时表aaa D系统临时表cursor aaa（2）运行时输入书号“003”，则输出为：_C （A）分别显示书号为“003”的所有款项（B）显示书号为“003”的所有款项之和（C显示书号为“003”的第一条记录的款项（D）输入错误，没有输出阅读下面程序：CLEART=65R=20INPUT “请输入图形的行数N=” TO NI=1DO WHILE I=N J=1 DO WHILE J=2*I-1 I,J+R SAY CHR (T) J=J+1 IF J=I T=T+1ELSE T=T-1 ENDIFENDDOI=I+1R=R-1T=65ENDDORETURN(1)运行程序后输出图形C （A） A （B） A BBB ABC CCCCC ABCDE DDDDDDD ABCDEFG EEEEEEEEEEEE ABCDEFGHIJ （C） A A ABA BAB ABCBA CBABC ABCDCBA DCBABCD ABCDEDCBA EDCBABCDE （2）语句I,J+R SAY CHR(T) 中函数CHR（）的功能是D（A）从字符T中取出子串（B）返回字符T的ACS码值（C）返回字符T的ACS码字符（D）返回表示的ACS码字符： CLEA BM=SPACE(10) 5，10 SAY“请输入表名：”GET BM READ BM=ALLTRIM(BM) IF FILE(“