VFP程序填空题的作业答案.docVIP

程序填空题的应试技巧 程序填空题采用的是选择填空，在做题时可采用以下方法来寻找正确的答案。 1．找匹配语句。 （1）根据程序结构来填空。有DO WHILE，考虑有无ENDDO配对，有IF，有无ENDIF配对。 USE 学生 …… USE LOCATE FOR ……CONTINUE或FOUND（）或!EOF() INDEX ON ……SET INDEX TO SET PROC TO 过程名 ……SET PROC TO （2）如果程序中有变量的使用语句，如S=S+1，X=X+1，检查程序开头处有无变量赋初值的语句，是否需填STORE 0 TO S, X。 （3）使用TOTAL命令，检查是否存在建索引或排序的语句。 （4）DO AAA(过程名) WITH … ，检查过程中有无PARA。 2．边读程序边做题 用实例代入读程序，并结合语句含义和函数来考虑。 3.与表文件有关的函数有： 函数：EOF() BOF() FCOUNT() FIELDS() FOUND() FILE() RECNO() RECCOUNT() 命令 REPLACE …… WITH LOCATE ……FOR DELETE FILE DISP ALL FOR …… APPEND BLANK COUNT TO 新变量名 FOR …… SUM 数值型字段 TO 新变量名 FOR …… AVERAGE数值型字段 TO 新变量名 FOR …… SKIP n DISP NEXT N 4．输入和输出语句: 程序填空题 1：[程序说明]求1！+3！+5！+······N！的值。N由键盘输入，且为奇数。 [程序] SET TALK OFF CLEAR __(5)__ STORE 0 TO S，T FOR I=1 TO N STEP 2 DO SUB __(6)__ ENDFOR ?S SET TALK ON PROC SUB T=1 FOR J=1 TO __(7)__ __(8)__ ENDFOR （5）、A）ACCEPT N= TO N B）INPUT N= TO N C）WAIT N= TO N D）DO WHILE .T. （6）、A）S=S+T B）S=S+N C）S=T D）S=S+T*I （7）、A）N B）T C）2*I+1 D）I （8）、A）T=T*I B）T=T*J C）T=T*N D）S=S+J*T 2、由用户输入指定表文件、指定字段和指定内容进行查询。 SET TALK OFF CLEA ACCEPT ‘输入表名（带扩展名）’TO FN ACCEPT ‘输入字段名（字符型）’TO FDN ACCEPT ‘输入查询内容（字符串）’TO CH IF (1) (2) LIST FOR (3) USE (4) ? ‘找不到该文件！’ ENDIF SET TALK ON (1) A、VART(FN) B、FILE(‘FN’) C、FILE(FN) D、FILE(FN) (2) A、USE EVAL(FN) B、USE FN C、USE FN..DBF D、USE (FN.DBF) (3) A、CH$FDN B、AT(CH,FDN)0 C、CH$FDN D、AT(CH,FDN)0 (4) A、EXIT B、LOOP C、IF D、ELSE 3、程序：本程序的功能：从键盘输入N个无序数（N由键盘确定），去掉一个最大数，去掉一个最小数，然后求平均值。 [程序] SET TALK OFF CLEAR INPUT N= TO N INPUT A= TO A STORE A TO X，Y ___(5)___ P=N-2 ___(6)___ INPUT B= TO B S=S+B IF XB X=B ENDIF __(7)__ Y=B ENDIF ENDFOR __(8)__ ?R/P SET TALK ON （5）A）S=A B）S=