[IT认证]《数据库程序设计》第八章.ppt

* 输出0~9这十个数。 i=0 表示当前待输出的数字 DO WHILE i10 ??i i=i+1 ENDDO * 2、步长循环 格式： FOR 内存变量=初值 TO 终值[ STEP步长 ] 语句序列 ENDFOR | NEXT 功能： 通过比较循环变量值与终值决定是否执行语句序列 说明： 步长为正时，若循环变量值不大于终值就执行循环体，然后变量=变量+步长。否则执行ENDFOR或NEXT后的语句 步长为负时，若循环变量值不小于终值就执行循环体，然后变量=变量+步长。否则执行ENDFOR或NEXT后的语句 步长缺省值为1 * s=0 For i=1 to 100 s=s+i Next ?”s=”,s 计算S=1+2+……+100 s=0 For i=1 to 100 step 2 s=s+i Next ?”s=”,s 计算100以内奇数的和 * 3、扫描循环 格式： SCAN [范围][FOR逻辑表达式1][WHILE 逻辑表达式2] 语句序列 ENDSCAN 功能： 对当前表进行循环，在范围内查找满足FOR条件或WHILE条件的记录，执行语句序列 * 显示成绩.DBF中所有成绩高于85分的学生学号 Use 成绩 do while not eof() if 成绩85 ?学号 endif skip Enddo use Use 成绩 Scan for 成绩85 ?学号 Endscan use clear Use 成绩 go bottom n=recno() for i=1 to n go i if 成绩85 ?学号 endif next use * 循环中两个特殊命令语句 1、退出语句： EXIT 2、重新循环语句： LOOP 注意：这两个命令必须嵌入在循环体内，一般放在IF语句中，可以改变循环，但不能单独使用。 死循环时，程序-取消 * 求 S=1+2+3 + ······ 当 S1000 即停止。 s=0 For n =1 to 100 s = s + n if S 1000 EXIT ENDif endfor ? “n =” , n * 计算100以内奇数的和 s=0 For i=1 to 100 if i % 2=0 loop else s=s+i endif Next ?s=,s s=0 For i=1 to 100 if i % 2=0 loop endif s=s+i Next ?s=,s 循环结构程序设计典型题目 累加或累乘 * 累——具有初始值的结果变量 循环变量表示当前待处理的值 挑选满足条件的值（分支） 做累加或累乘操作 计算1~10间能被3整除的数之积 s=1 For i=1 to 10 if i%3=0 s=s*i endif Next ?s=,s 循环结构程序设计典型题目 统计个数 * 统计——用循环对每个字符进行判断 判断方法很重要 计数变量，初始值为0 每出现一个满足条件的字符，计数变量加1 输入字符串，统计其中大写字母、数字和空格的个数 dx=0 大写字母的个数 sz=0 数字的个数 kg=0 空格的个数 accept “请输入字符串” to x n=len(x) For i=1 to n c=substr(x,i,1) do case case c=“Z” and c=“A” dx=dx+1 case c=“0” and c=“9” sz=sz+1 case c=“ ” kg=kg+1 endcase Next ?“dx=“,dx, “sz=“,sz, “kg=“,kg 循环结构程序设计典型题目 打印图形 * 打印多行——用外层循环控制行数 每行后面以回车结尾 每行中按 要求打印若干空格或指定字符——用内