程序的设计(二).ppt

程序设计（二） 复习提问 建立命令文件及调用命令文件的命令 条件分支结构程序的编制 循环是指按照给定的条件去重复执行一段具有特定功能的程序 第十讲：程序设计（二） 重点介绍DO WHILE---ENDDO循环 介绍LOOP及EXIT命令的使用 重点介绍FOR—ENDFOR循环的使用 介绍SCAN—ENDSCAN循环的使用 DO WHILE—ENDDO循环 语句格式： DO WHILE 〈条件表达式〉 〈语句组〉 ENDDO 语句功能： 当条件表达式的值为真时，执行语句组 否则执行ENDDO后面的语句 说明： DO WHILE和ENDDO之间的语句称为循环体 循环体可以是一个语句 一组语句 也可以是一个VFP子程序 ENDDO是循环终止语句，循环以此为终点 循环语句本身不会修改执行的条件 要在循环体内设置修改循环条件的语句 否则会出现死循环 【例6.23】 以显示方式输出1到10的数字 SET TALK OFF CLEAR I＝1 DO WHILE I=10 ？ I I＝I＋1 ENDDO 语句I＝I＋1就是用来修改循环条件 【例6.24】 程序如下： STORE 0 TO C, W USE ZGDA DO WHILE .NOT.EOF( ) DO CASE CASE (年龄45).AND.职称=讲师 W=W+1 CASE (年龄45) .AND.职称=副教授 C=C+1 ENDCASE SKIP ENDDO ? 人数为： ，W ? 人数为： ，C SET TALK ON CANCEL 转跳语句(LOOP) 在DO WHILE－ENDD O循环体内提供了一条短路语句，可以起到转跳作用 语句格式： LOOP 语句功能： 中断本次循环体的执行 跳回到DO WHILE的开始处，重复条件的判断 说明： LOOP语句一定要用在DOWHILE的循环体内才有意义 LOOP语句使它后面的语句在本次循环时不被执行 在具有多重DO WHILE－END DO嵌套的程序中，LOOP只返回到与它本身所处的内层循环体相匹配的 DO WHILE语句p121 【例6.25】 工资小于160元的增加10元 SET TALK OFF USE DA2 DO WHILE .NOT.EOF( ) SKIP LOOP ENDIF REPLACE 工资 WITH 工资＋10 SKIP ENDDO 【例6.26】 求0～100之间奇数之和 SET TALK OFF X=0 Y=0 DO WHILE X100 X=X+1 IF INT(X/2)=X/2 LOOP ELSE Y=Y+X ENDIF ENDDO ? 0～100之间的奇数之和为： , Y SET TALK ON CANCEL 此程序中 用INT(X/2)是否等于X/2判断X是否为偶数 是则执行LOOP语句，返回DOWHILE 如果INT(X/2)不等于X/2 说明X的值为奇数 执行LOOP后面的语句，将奇数累加 2.出口语句(EXIT) 如果在循环的中途，需要结束循环而转到本层循环的后继命令去执行，可以用出口命令 语句格式： EXIT 语句功能： 终止DO WHILE－ENDDO的正常循环 无条件地转到ENDDO的后继命令去执行 多重循环，只能跳出一层 【例6.27】 计算1＋2＋3＋…＋100的和 SET TALK OFF N＝1 S＝0 DO WHILE .T. IF N100 EXIT ENDIF S=S+N ;N=N+1 ENDDO ? “S=”,S 多重循环中LOOP和EXIT的作用域 循环的嵌套: 如果在一个循环程序的循环体内又包含着另一些循环，就构成了多层次(多重)循环 LOOP和EXIT语句放在哪一个层次，它就只能在那个层次中起作用， 这个层次就是它的作用域 P121 DO WHILE DO WHILE LOOP EXIT ENDDO LOOP EXIT ENDDO FOR—ENDFOR循环 语句格式： FOR 循环变量=〈初值〉TO〈终值〉［STEP〈步长〉］ 〈命令序列