4、定义一个计算圆面积的函数，编写主程序实现输入任意一个半径，调用该函数求出圆的面积并显示结果。 参考程序：input “请输入圆的半径：” to r
S=area(r)
?”圆的面积为：”,s Return Function area Parameter r1
S1=pi()*r1^2 Return s1
5、建立程序main5.prg，如下图所示，通过本例了解变量的作用域。程序执行结束后，再在命令窗口分别输入?x1, ?x2, ?x3看看能否显示变量的值。
五、 实验注意事项
区分交互式输入命令ACCEPT、INPUT、WAIT三种命令的相同点与不同点。
六、 思考题
1、把实验内容选择结构第5题改写成嵌套的IF语句。输出语句也可以写在所有判断结束之后，想一想怎样写？
2、编写程序exercise1.prg，将成绩在85分至90分之间的学生的学号、课程号、成绩等信息显示在屏幕上。
实验五 查询与视图
一、 实验目的
1、掌握SQL语言的数据定义功能、数据操作功能、数据查询功能，重点掌握基本查询和条件查询。 2、掌握查询和视图设计器的使用。
二、 实验原理
SQL查询语言、SQL的操作功能、定义功能、查询与视图设计器
三、 主要仪器及耗材
PIV以上计算机，安装Visual FoxPro6.0
四、 实验内容与步骤
一、SQL语言的应用
1、创建表：创建一个学生表 xs.dbf，包括以下字段（学号，姓名，性别，出生日期，入学成绩，专业），请自行设计字段类型和宽度。
参考命令：create table xs.dbf (学号 C(8),姓名 C(8),性别 L,;出生日期 D,入学成绩 N(6,2),专业 C(30))
（分号是续行符）
2、修改表结构：把xs.dbf中的字段姓名宽度改为10；增加一个字段 籍贯，字符型，宽度为10。
参考命令：alter table xs.dbf alter 姓名 C(10)
alter table xs.dbf add 籍贯 C(8)
3、增加记录：向 xs.dbf 中输入三条记录。
参考命令：insert into xs(学号,姓名,性别,出生日期,入学成绩,专业,;籍贯) values(” 20060001”,”王晓”,.T.,{^1990-1-12},523.10,;
”法学”,”江西”)
4、修改记录：将所有姓王的学生的籍贯修改为“山东”。 参考命令：update xs.dbf set 籍贯=”山东” where 姓名=”王” 5、删除记录：删除姓王的学生的记录。
参考命令：delete from xs where left(姓名,2)=”王” 6、查询：以下题目针对图书管理数据库中的表进行操作。 （1）简单查询：按读者的出生日期升序列出所有读者的记录。 参考命令：select * from 读者.dbf order by 出生日期
（2）条件查询：从读者.dbf中查询出所有非湖北籍的读者记录。 参考命令select * from 读者.dbf where not(籍贯=”湖北”)
（3）条件查询：从图书.dbf中查询出价格在20元以上25元以下的图书记录，并将查询结果存到表chaxun1.dbf中。
参考命令：select * from 图书.dbf where 价格>20 and 价格<25 into dbf; chaxun1.dbf
（4）条件查询：从图书.dbf中查询出所有“教育出版社”出版的书号、书名、出版社。
参考命令：select 书号,书名,出版社 from 图书.dbf where 出版社; like ”%教育出版社%”
（5）连接查询：查询出2003年6月以后借书的读者的读者编号、姓名、借书日期。
参考命令：select 读者.读者编号,读者.姓名,借书.借书日期 from 读者,借书 where 读者.读者编号=借书.读者编号 and 借书.借书日期>={^2003-06-01}
（6）嵌套查询：找出所有男读者的借书记录。
参考命令：select * from 借书 where 读者编号 in (select 读者编号 from 读者 where 性别=”男”)
（7）统计查询：计算出图书表中“清华大学出版社”的图书总数量。 参考命令：select sum(数量) as 总数 from 图书 where 出版社=”清华大学出版社”
（8）分组查询：分别统计读者表中男女读者的人数。
参考命令：select 性别,count(性别) as 人数 from 读者 group by 性别 二、查询与视图设计
针对学生成绩数据库完成以下操作：
1、对学生表student.dbf建立一个查询cx1.QPR，要求显示以下字段：学号、姓名、性别、出生日期、总分，并按“学号”降序排列，运行该查询观察结果。
2、建立一个查询cx2.QPR，要求：列出86年出生的学生的学号、姓名、性别、系科，并按“姓名”升序排列，运行该查询观察结果。
3、建立一个查询cx3.qpr，要求：列出所有女生的学号、姓名、所选课程号、成绩，按“姓名”降序排列，运行该查询观察结果。（提示：该查询涉及两个表）
4、建立一个查询cx4.qpr，要求：列出学生表student中男女学生的人数。（提示：分组统计）