程序实验报告6

第6章VisualFoxPro程序设计基础实验报告学生姓名FORMTEXT李小平学号FORMTEXT0090526教学班FORMTEXTA40FORMTEXT密381实验项目FORMTEXT程序设计基础与应用实验地点G303实验课日期与节次FORMTEXT2010年11月15日FORMCHECKBOX必修FORMCHECKBOX选修指导教师赖新峰批阅教师电子稿记录FORMTEXT迟交(抄习)报告电子稿在此录[迟][抄]指导教师评语及成绩：FORMTEXT红笔批阅：成绩：FORMTEXTFORMTEXT教师签名：日期：FORMTEXT打印稿记录FORMTEXT等级迟交：抄习：一、实验综述㈠实验目的及要求掌握算法的基本思想和结构程序设计的基本方法。掌握VisualFoxpro程序设计语言的特点和基本输入、输出命令。熟悉程序文件的创建、运行和调试过程。掌握顺序结构程序设计的思想和方法。掌握选择结构程序设计的思想和方法，进一步了解逻辑表达式和算数表达式应用技巧。掌握单重循环程序的编写。掌握多重循环程序的编写。㈡实验仪器、设备或软件VisualFoxpro6.0关系数据库软件。网络环境。㈢实验任务任务1：关于数据库的编程设有数据库studentdb.dbc，数据库包含表class、表student、表achievement和表course，各个数据表的字段类型请自行查阅。查询前必须按下列要求增加记录：①现有的class表中增加一个班级，班级号为EFC0802，班级名“金融管理08-02班”。②在student表中至少增加3条相关实验者的真实身份的记录。以实验者真实身份学号：FORMTEXT，姓名：FORMTEXT，班级号EFC0802（新增的班级号）等相应信息添加student表中；再添加2条记录：1条是与你的姓相同且班级号、籍贯与实验者相同的记录；另1条是名中有一个字与你的名相同且班级号、籍贯与刘翔相同的记录的记录。新增的3条记录并性别、出生日期、入学成绩等数据在合理的范围中。③对每个新增学生记录至少在achievement表中增加2个成绩（注意合理增加课程号）。编程实现：编程统计并输出班级号为"EFC0801"的男生人数和女生人数（杜绝使用SQL查询语句和统计命令。任务2：关于分支结构的编程分别用IF-ELSE-ENDIF和DOCASE/ENDCASE分支结构方法求下列函数f(x)的值（其中实验者真实身份的学号FORMTEXT0090526，后2位非0的数字为FORMTEXT26。要求实验时x的值临时从键盘上分别输入:正FORMTEXT26和负FORMTEXT26及-0.FORMTEXT26进行调试，给出其相应的结果）任务3：关于循环结构的编程(学号尾数为奇数做第一、三题；学号尾数为偶数做第二、四题；第五题为必做题)要求每题有一个循环控制变量须用实验者的姓氏拼写，例如:陈姓用chen（1）从键盘上输入10个数据，然后按相反的顺序不换行输出；在程序中找出最大和最小者，计算这10个数的平均值。（在表达运行结果时关于输入可在一行中指出输入数据的顺序，若实验者真实身份的学号FORMTEXT0806798，后2位非0的数字为FORMTEXT98，则要求第10个数据输入FORMTEXT98，然后正确给出答案）（2）实验者真实身份的学号FORMTEXT0806798，后3位非0的数字为FORMTEXT798，编程计算FORMTEXT798至1000整数之间的全部素数。（要求每行仅输出8个结果）（3）实验者真实身份的学号FORMTEXT0806798，后3位非0的数字为FORMTEXT798，编程求数列1,1/2,2/3,3/5,5/8,8/13,……前FORMTEXT798项之和?（4）编程计算S=1+(1+2)+(1+2+3)+…+(1+2+3+4+…+FORMTEXT98）其中FORMTEXT98是实验者真实身份的学号FORMTEXT0806798的后2位非0的数字。（5）用循环控制结构及格式化输出和非格式化输出2种方法分别编程实现图6-3的几何图形。（本题在报告中仅给出程序即可）图6-3几何图形（倒直角三角形）二、实验过程（试验步骤、源程序代码）FORMTEXT编程前按照要求填写学生姓名，学号，教学班，实验地点等相关内容。认真阅读实验目的及要求和按照任务一填写相关的记录看了下题目类型然后再课本上找相关的例题源程序FORMTEXT任务一clearsetdefatoc:\myworkusestudents1=0s2=0dowhile.not.eof()ifclassno="EFC0801"ifsex='男's1=s1+1elses2=s2+1endifelseendifskipenddo?'班级号为EFC0801的男生总数:',s1?'班级号为EFC0801的女生总数:',s2任务二clearinput"请输入x的值："toxifx<=-1f=1/(3-x)elseifx>=1f=1/exp(x)elsef=1/(2+x^2)endifendif?fclearinput"请输入x的值："toxdocasecasex<=-1f=1/(3-x)casex>=1f=1/exp(x)case-1<x<1f=1/(2+x^2)endcase?f第二题clear@2,10say"所有的素数有："input"请输入n的值："tonm=1f=0fori=nto1000a=int(sqrt(i))k=2dowhilek<=aifmod(i,k)=0exitendifk=k+1enddoifk>a@4+f,4*msaystr(i,4)m=m+1ifm=9m=1f=f+1@4+f,4*msaystr(i,4)endifendifendfor第二题clear@2,10say"所有的素数有："input"请输入n的值："ton?m=0&&每行的个数fori=nto1000a=int(sqrt(i))k=2dowhilek<=aifmod(i,k)=0exitendifk=k+1enddoifk>am=m+1??str(i,4)ifm=8m=0?endifendifendfor4.clearinput"请输入一个n的值："tons=0fori=1tons=s+(1+i)*i/2next?str(n,2)+"计算值="+str(s,6)5.1.clearfori=1to7forj=1to8-i@i,i+j-1saystr(8-i,1)endforendfor5.2.cleari=1dowhilei<=7?space(i-1)forj=1to8-i??str(8-i,1)nexti=i+1enddo三、实验主要结果与程序调试过程的说明1.实验结果FORMTEXT任务一班级号为EFC0801的男生总数：2班级号为EFC0801的女生总数：0任务二请输入x的值：-260.0345请输入x的值：260.0000请输入x的值：-0.260.4837请输入x的值：-260.0345请输入x的值：260.0000请输入x的值：-0.260.4837第二题所有的素数有请输入n的值:526541547557563569571577587593599601607613617619631641643647653659661673677683691701709719727733739743751757761769773787797809811821823827829839853857859863877881883887907911919929937941947953967971977983991997第四题请输入一个n的值：2626的计算值=3276第五题777777766666655555444433322177777776666665555544