第五章程序设计基础循环研讨.ppt

第五章之循环结构程序设计 5.2.5循环结构程序设计 1．DO WHILE 循环语句 在解决实际问题时，有许多操作(特别是对大量数据的处理)往往需要重复进行。在程序中这种处理要求反复执行某段程序，而且每次使用的数据都按一定规律变化，这种程序结构称为循环结构。 VFP提供了三种循环结构语句。 基本流程 Do while 循环 [格式] DO WHILE 条件表达式 语句序列1 [ LOOP ] [ EXIT ] …… ENDDO [注释] 举例：计算 10！的值并输出。 1！=1×1， 2！=1!×2， 3！=2!×3， ……， n！=(n－1)!×n 。 以S存放阶乘， 则顺序执行以下赋值语句， S＝（n－1）！ S＝S*n=（n－1）！×n=n！ SET TALK OFF CLEAR S=1 暂存阶乘值 N=1 控制循环次数，兼产生自然数 DO WHILE N=10 S=S*N N=N+1 ENDDO ? “10!=”，S SET TALK ON 例：设有一张足够大的厚度为0.5毫米的纸，问至少折叠多少次可以达到（或超过）珠穆朗玛峰（8848.13米）。 n=0 hight=0.5 do while .t. hight=hight*2 n=n+1 if hight=8848.13*1000 exit endif enddo ?”为超过珠峰高度，应折叠”+str(n)+”次” Do while not eof()循环 用来处理数据表 DO WHILE NOT EOF() 或DO WHILE EOF=.F. ＜语句组＞ SKIP ENDDO SCAN循环 该语句是为处理数据表而设计的循环语句。 [格式] SCAN [范围] [ FOR / WHILE 条件表达式] 语句序列 [ EXIT ] [ LOOP] ENDSCAN 说明： 通过循环依次处理给定范围符合条件的每一条记录，语句本身自动移动记录指针。 For 循环 [格式] FOR 内存变量 = 数值表达式1 TO 数值表达式2 STEP数值表达式3 语句序列 [ EXIT ] [ LOOP ] ENDFOR | NEXT 求1000之内所有奇数之和。 S=1+3+5+……+999 S=0 初始化S For I=1 to 1000 step 2 产生1，3，5……，999 S=s+i Endfor ?”1000之内所有奇数之和为：”+str(s) 练习： 求1000之内所有不能被3整除的整数之和。 FOR循环语句举例 举例：用试探法求解百鸡问题，“鸡翁一，值钱五；鸡母一，值钱三；鸡雏三，值钱一，百钱百鸡，问鸡翁、母、雏各几何？” 设：X—公鸡，Y—母鸡，Z—小鸡　 for x=1 to 20 for y=1 to 33 for z=1 to 300 if 5x+3y+z/3=100 .and. x+y+z=100 ? “公鸡＝”,x ? ”母鸡＝”,y ? “小鸡＝”,z endif endfor endfor next 几个例子 输出九九乘法表 note 九九乘法表 set talk off clear j=1 do while j=9 i=1 do while i=j ??str(j,1)+*+str(i,1)+=+str(i*j,2)+space(2) 输出公式 i=i+1 enddo ? 换行 j=j+1 enddo set talk on return N个数排序 对n个数进行排序（从小到大） 思路：1）两两比较，前者大于后者就交换 ——冒泡法 2）第一个数和后面几个数比较，大于就交换，再让第二数和后面的数比较… ——选择法 冒 泡 法 冒 泡 法 冒 泡 法（沉底法） 10个数比较大小