VFP数据库程序设计基础课后作业(三)参考答案

VFP数据库程序设计基础课后作业（一）2011.11.10

一、根据题目要求，对进行books.dbf进行数据统计，写出相应的VFP命令

1、统计类别为“计算机”的图书共有几种。

USE "c:\documents and settings\administrator\桌面\ books.dbf"

count all for 类别="计算机" to x

?x

2、统计所有书籍的平均页数。

average 页数to x

3、统计高等教育出版社出版的图书的价格总和。

sum 价格for 出版单位="高等教育出版社"

4、统计会计类图书价格最高是多少，最低是多少？

calculate max(价格),min(价格) for 类别="会计"

二、根据题目要求，编写Vfp程序

1、编写一个程序，根据输入的长方形的长和宽，计算长方形的周长和面积。

Clear

local C,S

input "请输入长方形的长：" to x

input "请输入长方形的宽：" to y

C=2*（x+y）

S=x*y

?"长方形的周长为:",C

?"长方形的面积为:",S

例1：设计程序先用XXXX年XX月XX日显示当前日期的年月日，再用星期X显示星期，然后

用XX时XX分XX秒显示当前时间（共分三行显示）。

?alltrim(str(year(date())))+"年"+ alltrim(str(month(date())))+"月"+ alltrim(str(day(date())))+"日"

?cdow(date())

?alltrim(str(hour(datetime())))+"时"+ alltrim(str(minute(datetime())))+"分"+ alltrim(str(sec(datetime())))+"秒"

3、编写一个程序，程序的功能是根据5个评委所给分数，计算并输出“最后得分”，具体计算方法

是去掉一个最高分、去掉一个最低分，再对其余得分求平均。

Clear

local DF

input "1号评委给分：" to x1

input "2号评委给分：" to X2

input "3号评委给分：" to X3

input "4号评委给分：" to X4

input "2号评委给分：" to X5

DF =((X1+X2+X3+X4+X5)-max(X1,X2,X3,X4,X5)-min(X1,X2,X3,X4,X5))/3

?"最后得分:",DF