期中练习VFP02答案.docVIP

期中练习（二） 说明： 启动VFP后用SET DEFA TO命令设置路径； 题目中所有涉及到的考生信息内容皆为本人的真实姓名和院系内容； 一项目、数据库和表操作(12分) 打开素材项目文件JXGL,在该项目中已有一数据库JXSJ。 1、在JXSJ数据库中按如下表格中所示的结构创建AB02.DBF表,并按表格中的要求设置相关属件。 字段名 数据类型 宽 度 字段标题 RQ D 日期 qcph C 8 汽车牌号 DD C 20 地点 TP G ? 图片 设置AB02表的表注释：汽车违停记录 设置日期字段的默认值：当前系统日期减一 设置地点字段的显示类：列表框 设置汽车牌号字段的有效性规则：不能为空 创建普通索引，索引名abcd，要求按地点排序，相同时根据汽车牌号排序 2、在AB02表中输入记录; RQ QCPH DD 默认值 苏A88888 世纪广场 3、修改jc表数据：所有记录的单价字段的值取整 4、已知JS表已存在主索引gh，索引表达式为GH；KCAP表已存在普通索引gh, 索引表达式为GH, 以JS表为主表, KCAP表为子表, 按gh建立永久关系, 并设置两表之间的参照完整性:更新限制、插入限制 二、设计查询 已知自由表图书表（TSB）含有分类号（flh，C）、书名（sm，C）、价格（jg，N）等字段；自由表图书借阅biao（JYB），含有读书类型（lx，C），分类号（flh，C）等字段。按如下要求修改JXGL项目中的查询CHAXUN： 基于TSB表和JYB表查询价格在20元（含20）元以上的图书借阅情况。要求：查询输出字段为FLH、SM、教师借阅次数、学生借阅次数、价格；查询结果按价格降序排列；输出去向为表文件TEMP。 程序改错： 新建一个程序文件，输入下列代码，并改错。 回文数是指正读和反读都一样的数，例如121，1001，1221等。下列程序的功能是：求出小于2000的所有回文数，并将它们打印出来（每行打印5个数，最后一行打印总个数）。 store 0 to n,n1,n2 for i=1 to 2000 s=allt(str(i)) n1=len(s) n2=int(n1/2) istrue=.t. for j=1 to n2 if subs(s,j,1)=subs(s,n1-j+1,1) 改为：subs(s,j,1)!=subs(s,n1-j+1,1) istrue=.f. exit endif endif 改为 endfor if istrue n=n+1 ??i if int(n/5)=n/5 ? endif endif endfor ? 共+str(n)+个