5、读程序写结果
CLEAR ALL
STORE 0 TO a,b,c,d,n
DO WHILE .t.
n=n+5
DOCASE
CASEn<=30
a=a+1
LOOP
CASEn>=70
b=b+1
EXIT
CASEn>=50
c=c+1
OTHER
d=d+1
ENDCASE
n=n+5
ENDDO
? a,b,c,d,n
RETURN
程序运行结果为：
6、阅读下列程序，写出程序运行结果。
SET TALK OFF
DIMENSION F(6)
F(1)=1
F(2)=1
I=3
DO WHILE I<=6
F(I)=F(I-1)+F(I-2)
I=I+1
ENDDO
FOR I=1 TO 6
?F(I)
NEXT I
SET TALK ON
程序运行结果为：

编程题
1、编写程序实现下列功能：
考试成绩.dbf文件中有“考号”、“姓名”、“语文成绩”、“数学成绩”及“是否合格”等字段，若语文成绩和数学成绩均不低于60分，则在“是否合格”字段填写“合格”，否则填写“不合格”。
2、编写程序计算1！+2！
+3
！+4！+5！表达式的结果。
3、已知珠穆朗玛峰海拔高度是8844.43m，设想有一张足够大的纸，其厚度为0.05mm。试编写一个程序，计算要将这张纸对折多少次，其厚度可超过珠穆朗玛峰的高度。

有一个“学生”表：由学号、姓名、性别、出生日期、所在系五个属性组成，学号为主关键字。
使用SQL语言完成下列操作：
1、创建“学生”表，学号c(8)、姓名c(8)、性别c(2)、所在系c(10)为字符型数据类型，出生日期为日期型数据类型。
2、向“学生”表插入如下记录：
学号：12001001；姓名：张红；性别：女；出生日期：1992年12月25日；所在系：经济系。
3、查询“学生”表中全体男学生的学号与姓名。
4、查询1993年1月1日之后出生的同学姓名、所在系。
5、 查所有姓刘的学生的姓名、学号和性别。