VFP表达式.doc

表达式1写出表达式的VFP表达形式：A-B/（A+B） 2写出表达式的VFP表达形式： （A-B）/（A+B）3写出表达式的VFP表达形式：2*A3+3*A*2-B 4写出表达式 -10X10 的VFP表达形式： 5写出表达式 X-20或X+20 的VFP表达形式： 6. X+Y小于10而且x-y大于0的VFP表达形式是： 。7写出表达式B2-4AC 的平方根： 。阅读程序1阅读下列程序，写出程序运行结果： 【程序清单】 CLEAR FOR I=1 TO 9?STR(I,2)+”：”FOR J=1 TO I?STR(J*I,4)ENDFORENDFOR2阅读下列程序，写出程序运行结果： 【程序清单】 CLEAR C=”123456789” FOR I=1 TO 9?SPACE(I)+SUBS(C,I,1)ENDFOR3阅读下列程序，写出程序运行结果： 【程序清单】 SET TALK OFF CLEAR M=”X” X=123 ?&M4阅读下列程序，写出程序运行结果： 【程序清单】 CLEAR C=”南京大学信息管理系” FOR I=1 TO LEN(C)/2 IF I%20?SUBS(C,2*I-1,2) ENDIF ENDFOR5阅读下列程序，写出程序运行后 BROW 命令显示的表文件名及当前工作区。 【程序清单】 USE XS SELE 3USE JSUSE KC IN 0BROW6阅读下列程序，写出程序运行结果： 【程序清单】CLEARC=10 20 30DO WHILE LEN( C )0C=ALLT(C)N= AT(SPACE(1),C)IF N 0?LEFT(C,N-1)C=SUBS(C,N+1)ELSE?CEXITENDIFENDDO7设教师(JS)表中含有100个记录，阅读下列程序，写出程序运行后显示的表记录个数。 【程序清单】CLEARUSE JSSCAN?RECNO(),GH,XMSKIPENDSCANUSE 8阅读下列程序，写出程序运行后显示结果为： 【程序清单】 CLEAR DIME X(6),Y(6) FOR I=1 TO 6X(I)=I*I ENDFORFOR J=1 TO 6 Y(J)=X(7-J) ?Y(J) ENDFOR9阅读下列程序，写出程序运行后 BROW 命令显示内容对应的表文件名。 【程序清单】 C=”XSJSKC” F=LEN(C) N=F/2 X=SUBS(C,N,2) USE &X BROW10阅读下列程序，写出程序运行结果： 【程序清单】CLEARJ=0?FOR I=1 TO 18J=J+1IF J6? J=1ENDIF?IENDFOR11阅读下列程序，写出程序运行结果： 【程序清单】 CLEAR C=微机数据库Visual FoxPro 教程 ? DO WHILE LEN(C) 0 IF ASC(LEFT(C,1)127?LEFT(C,2)C=SUBS(C,3)ELSEC=SUBS(C,2)ENDIFENDDO12阅读下列程序，写出程序运行结果： 【程序清单】 CLEAR C=”南京大学信息管理系” FOR I=1 TO LEN( C )/2?SPACE(2*I)+SUBS(C,2*I-1,2)ENDFOR13阅读下列程序，写出程序运行后最后一次显示A 的值是： 【程序清单】 PUBLIC A A=123 ?A DO PR1 WITH A ?A* PROC PR1 PARA B B=B*2 RETU BCLEARC=Visual FoxProFOR I=1 TO LEN( C ) IF ASC(SUBS(C,I,1)64 AND ASC(SUBS(C,I,1)91? SUBS(C,I,1) ENDIFENDFOR 14阅读下列程序，写出程序运行结果： 【程序清单】C=三江大学计算机基础部I=1?DO WHILE I7 AND I15 ?SUBS(C,I,2) ENDIF I=I+2ENDDO 15阅读下列程序，写出程序运行结果： 【程序清单】 C=”ABCDEF” FOR I=1 TO 6 ?ASC(SUBS(C,I,1) ENDFOR16阅读下列程序，写出程序运行结果：【程序清单】CLEARC=ABCCC=FOR i=1 TO LEN(C) CC=SUBS(C,i,1)+CCENDFOR ?CC. 17阅读下列程序，写出程序运行结果： 【程序清单】CLEARC=ABCDEFFOR I=1 TO 3? SUBS(C,I,I)ENDFOR 18阅读下列程序，写出程序运行结果：【程序清单】CLEARC=ABCDEResult=SPACE(0)FOR I=1 TO LEN(C) Result=SUBS(C,I,1)+ResultENDFOR? Result 19. 执行以下程序，输出结果是_。 【程序清单】CLEARP=1S=0FOR I=1 TO 3 P=P*I S=S+PENDFOR? S 20阅读下列程序，写出程序运行结果：【程序清单】CLEARC=*FOR I=1 TO 5?LEFT(C,I)ENDFOR 编程序1用 FOR ENDFOR 结构编写一个程序实现 SN=1/12+1/32+1/192+1/212求和，并且显示计算结果。2用 FOR for endfor ENDFOR结构编写一段程序实现 Sn=1!+2!+10!求和，并且显示计算结果。3用 DO WHILE do while enddo ENDDO结构编写一段程序实现 Sn=1!+2!+10!求和，并且显示计算结果。4用 FOR for endfor ENDFOR 结构写一段程序，实现显示下列结果的功能。 ABBCCCDDDDEEEEEFFFFFF5用 FOR ENDFOR 结构编写一个程序实现 SN=1/22+1/42+1/202+1/222求和，并且显示计算结果。6用 DO WHILE ENDDO结构编写一段程序实现 Sn=1/(1*2)+1/(2*3)+1/(10*11)求和，并且显示计算结果。7用 FOR for endfor ENDFOR结构编写一段程序实现 Sn=1!+3!+11!求和，并且显示计算结果。8用 DO WHILEfor endfor ENDDO 结构编写一段程序，实现显示下列结果的功能。 ABBCCCDDDDEEEEEFFFFFF9 用FOR ENDFOR结构编写一个程序实现如下多项式求和。 10 基于KC（课程）表（含课程名：KCM，课程代号：KCDH字段） 和CJ（成绩）表（含课程代号：KCDH，成绩：CJ(数值型)字段），写出SELECT-SQL命令：查询每门课程的选课人数，平均分，不及格人数（cj60 为不及格）。输出字段为：课程代号、课程名、选课人数、平均分、不及格人数。11 、数据库SJK的JS（教师）表中有GH（工号）、XM（姓名）、XB（性别）、CSRQ（出生日期）等字段，要求写出SELECT-SQL命令，统计每个教师的年龄，按年龄降序排序，输出GH、XM、XB、年龄。（提示：年龄表达式是： YEAR(DATE()-YEAR(CSRQ) ）12 数据库SJK的学生表（XS）中，有学号（XH）、姓名（XM）、性别（XB）、系代号（XDH）等字段，要求创建SELECT-SQL命令，统计各系男女生人数。输出字段XDH，XB，人数。按人数降序排序。13 表单上有一个命令按钮组，包含3个命令按钮，要求对命令按钮组的Click（单击）事件用DOCASE - ENDCASE结构编程，以设置3个命令按钮不同功能： （1）单击第1个按钮将设置表单背景色为红色； （2）单击第2个按钮将设置表单运行自动居中；（3）单击第3个按钮将退出表单。 14用 FOR ENDFOR 结构编写一个程序实现 求和。1 用FORENDFOR结构编写一个程序实现对下列表达式求和。 2. 数据库SJK的XS（学生）表中，有BJBH（班级编号）、XH（学号）、XM（姓名）等字段，要求创建SELECT-SQL命令，输出各个班级学生人数，输出字段BJBH，人数，按人数降序排序，查询去向是临时表ABC。 3. 表单上有一个命令按钮