51-程序设计概述课件.ppt

5.2 结构化程序设计 5.2.4 循环结构 循环结构用于控制一组语句重复执行若干次，可预先指 定要循环的次数，也可根据某个条件控制循环。 VFP实现的三种语句： FOR…ENDFOR语句 DO WHILE…ENDDO语句 SCAN…ENDSCAN语句 * 5.2 结构化程序设计 1、 FOR …ENDFOR 语句 语句格式： FOR〈变量〉=〈初值〉TO 〈终值〉[STEP 〈步长〉] 〈语句组〉 ENDFOR / NEXT 功能： 主要用于执行已知次数的循环， 只要〈变量〉的值不超过终值， 程序将重复执行循环体中的语句。 当步长为1时,[STEP 步长]可缺省。 .T. 循环变量赋初值 循环变量是否超过终值 执行循环体 循环变量加步长 ENDFOR后面的语句 .F. * 5.2 结构化程序设计 S=0 FOR I=1 TO 99 STEP 2 S=S+I ENDFOR ?“前1~100之间的奇数和为：”，S 例5.8：求1+3+5……+99的和。 I=1 I是否超过99 S=S+I 循环变量加步长 ENDFOR后面的语句 .T. .F. * 5.2 结构化程序设计 P=1 FOR I=1 TO 100 P=P*I ENDFOR ?“100的阶乘为：”，P 例5.9：求100的阶乘。 I=1 I是否超过100 P=P*I 循环变量加步长 ENDFOR后面的语句 .T. .F. * 5.2 结构化程序设计 例5.10：下面程序的功能是将由英文组成的字符串加密。加密的算法是：如果是大写字母，用原字母后面第4个字母代替原字母，否则用原字母后面第2个字母代替原字母。例如，“China”的密文是“Gjkpc” m=SPACE(0) c=“China” FOR i=1 TO LEN(c) nc=ASC(SUBSTR(c,i,1)) IF nc64 AND nc9 m=m+CHR(nc+4) ELSE m=m+CHR(nc+2) ENDIF ENDFOR WAIT WINDOWS c+“字母加密后为”+m 在VisualFoxPro主窗口右上角的系统信息窗口中，显示信息,并暂停VisualFoxPro的执行，按某个键或单击鼠标后继续执行。 * 5.2 结构化程序设计 2、 DO WHILE …ENDDO 语句 语句格式： DO WHILE 〈循环判断条件〉 〈语句系列〉 ENDDO 功能：根据指定的逻辑条件，控制语句序列执行的次数。只有DO WHILE 条件为假时，才结束循环。 DO WHILE 条件判断 语句系列 ENDDO .T. .F. * 5.2 结构化程序设计 例5.11 求1+2+3……+100的和。 S=0 I=1 DO WHILE I = 100 S=S+I I=I+1 ENDDO ?“前100项的和为：”，S DO WHILE I = 100 语句系列 ENDDO .T. .F. * 5.2 结构化程序设计 例5.12: 将ASCII码字符组成的字符串进行反向显示。 STORE “abcdef” TO C, CC P=space(0) DO WHILE LEN(C) 0 P=LEFT(C,1)+P C=SUBSTR(C,2) ENDDO ?CC+”的反序为”+P * 5.2 结构化程序设计 EXIT：是循环的出口语句，遇到EXIT 循环结束。 LOOP：是短路语句，遇到 LOOP回到循环的开始而短路了LOOP与ENDDO/ENDFOR之间的语句。 在任何时候都可以通过使用EXIT命令从任何一个循环中退出，或者使用LOOP命令来跳过循环中的后续处理。 3、在循环中，可有两个特殊的语句：EXIT 和LOOP * 5.2 结构化程序设计 例5.13：求1~100之间非3的倍数的所有奇数之和。 S=0 FOR I=1 TO 100 STEP 2 IF MOD( I, 3 )=0 LOOP ENDIF S=S+I ENDFOR ?S * 5.2 结构化程序设计 例5.14：从键盘输入一个密码，若为“654321”，程序结束。 DO WHILE .T. ACCEPT “请输入密码：” TO PW