vf练习答案.doc

第5章 实验一 答案在e盘的根目录下按学号建立学生个人文件夹，再将教师机上提供的数据文件夹下的所有文件复制到学生机本地磁盘上的个人文件夹下。并将其设置为VFP工作的默认目录。打开“教学管理.pjx”项目文件，试建立以下程序文件并运行：注：程序文件分别命名为cx01.prg、cx02.prg、cx03.prg和。1学习指导P86第6章实验1:1：编写程序，从键盘输入一个日期，查询STUDENT表中该日期以后出生的学生信息并显示在浏览窗口中。*从键盘输入一个日期，查询STUDENT表中该日期以后出生的学生信息并显示在浏览窗口中。clearopen database 教学管理input 请输入一个日期： to rq &输入时应加日期定界符select * from student where 出生日期rqclose databasereturn2将上题程序修改为：从键盘输入日期后，首先判断该指定日期以后出生的学生是否存在，若存在，浏览显示这些学生信息，否则弹出信息框提示“没找到！”。*从键盘输入日期后，首先判断该指定日期以后出生的学生是否存在，*若存在，浏览显示这些学生信息，否则弹出信息框提示没找到！clearopen database 教学管理input 请输入一个日期： to rq &输入时应加日期定界符use studentlocate for 出生日期rqif found() select * from student where 出生日期rqelse messagebox(没找到,48)endifclose databasereturn3分别用双分支IfelseEndif和单分支IfEndif结构实现：从键盘上输入两个数，输出其中大的数。*用IfelseEndif结构实现*从键盘上输入两个数，输出其中大的数set talk offclearinput 请输入第一个数： to xinput 请输入第二个数： to yif x=y max=xelse max=yendif?两个数中大的数是:,maxset talk onreturn*用IfEndif结构实现*从键盘上输入两个数，输出其中大的数set talk off clearinput 请输入第一个数： to xinput 请输入第二个数： to ymax=xif x=y ?两个数从大到小的顺序是：,x,yelse ?两个数从大到小的顺序是：,y,xendifset talk onreturn*用IfEndif结构实现*从键盘上输入两个数，按从大到小的顺序输出set talk offclearinput 请输入第一个数： to xinput 请输入第二个数： to yif x=y max=xelse max=yendifif max=y if x=z max=x else max=z endifelse if y=z max=y else max=z endifendif?三个数中大的数是:,maxset talk onreturn6计算分段函数值： x （x1) y= 2x-1 （1x10) 3x-11 （x10）方法一：clearinput x= to xif x1 y=xelse if x10 y=2*x-1 else y=3*x-11 endifendif?x=,x,y=,yreturn方法二：clearinput x= to xif x10 if x1y=xelse y=2*x-1 endif else y=3*x-11endif?x=,x,y=,yreturn7学习指导P87第6章实验1:4：输入一个百分制成绩，要求输出成绩等级“A”、“B”、“C”、“D”、“E”。90分以上为“A”，8089分为“B”，7079分为“C”，6069分为“D”，60分以下为“E”。*输入一个百分制成绩，要求输出成绩等级A、B、C、D、E*90分以上为A，8089分为B，7079分为C*6069分为D，60分以下为Einput 请输入学生的百分制成绩： to cjif cj100 ?成绩输入有错误else do case case cj=90 dj=A case cj=80 dj=B case cj=70 dj=C case cj=60 dj=D otherwise dj=E endcase ?成绩是+str(cj,5,1)+,相应的等级是+djendifreturn 8课本P161三2：编写程序从键盘输入一个年份，判断它是否闰年。闰年的条件是：能被4整除但不能被100整除，或能被400整除。 *从键盘输入一个年份，判断它是否闰年。*闰年的条件是：能被4整除但不能被100整除，或能被400整除clearinput 请输入一个年份： to nfif (nf%4=0 and nf%100!=0) or nf%400=0 ?str(nf,4)+是闰年else ?str(nf,4)+不是闰年endifreturn 9课本P161三4：编写程序从键盘输入一个数（可以是C、N、D或L类型)，用INPUT语句接收到变量A中，通过类型判断，输出其数据类型的汉字说明。如输入A的值是“Hello!”，输出为：Hello!字符型数据；又如输入A的值是.T.，输出为：.T.逻辑型数据。提示：函数TYPE(A)测试变量A的数据类型，返回一个大写字母。 用DO CASE语句*从键盘输入一个数（可以是C、N、D或L类型)*用INPUT语句接收到变量A中，通过类型判断，输出其数据类型的汉字说明clearinput 请输入A的