vfp程序设计第7讲循环.ppt

2003.8 程序设计基础（3） 学习内容 1.简要回顾 2.FOR…ENDFOR/NEXT循环(重点) 3.DO WHILE… ENDDO 循环(重点) 4.多重循环 (难点) 5.应用程序举例 简要回顾-选择结构 函数与结构灵活运用 FOR…ENDFOR/NEXT循环 格式： FOR 变量=初值 TO 终值 [ STEP步长 ] 语句系列 [ EXIT ] [ LOOP] ENDFOR / NEXT 练习 FOR…ENDFOR循环能解决什么问题？ 1+2+3+…+n(n为一个固定的值) 1*2*3*…*n(n为固定值) 1+3+5+……+99 解决方案： DO WHILE ? ENDDO循环 格式： DO WHILE 条件表达式 语句序列 [ EXIT ] [ LOOP ] …… ENDDO Do while…enddo应用 格式： DO WHILE .T. 语句序列 IF 条件表达式 EXIT ENDIF ENDDO 例2-输入任意次数据 Do while…enddo应用 格式： N=初值 DO WHILE N=M 语句序列 N=N+X ENDDO 用记录指针控制循环 另一种循环：SCAN ? ENDSCAN 格式： SCAN [ 范围 ] [ FOR条件表达式1 ][WHILE条件表达式2] 语句序列 [ EXIT ] [ LOOP] ENDSCAN 循环结构小结 （1）DO WHILE和ENDDO、FOR和ENDFOR/next、SCAN和ENDSCAN必须配对使用。 （2）〈命令行序列〉可以是任何FoxPro命令或语句，也可以是循环语句，即可以为多重循环。 （3）〈循环变量〉应是数值型的内存变量或数组元素。 （4）EXIT和LOOP命令嵌入在循环体内，可以改变循环次数，但是不能单独使用。EXIT的功能是跳出循环，转去执行ENDDO、ENDFOR、ENDSCAN后面的第一条命令；LOOP的功能是转回到循环的开始处，重新对“条件”进行判断，相当于执行了一次ENDDO、ENDFOR、ENDSCAN命令，它可以改变〈命令行序列〉中部分命令的执行次数。EXIT、LOOP可以出现在〈命令行序列〉的任意位置。 控制结构综合应用 例8：百鸡问题 100元买100只鸡，公鸡5元/只，母鸡3元/只，小鸡1元3只 例9：判断某数是否为素数 从键盘输入一个大于1的正整数数，判断该数是否为素数 例10：两个正整数的最小公倍数和最大公约数 例11：口令验证 例12：字符串逆序输出 例13：输出规则图案 例14：向数据表输入数据 例8：百鸡问题 例9：判断某数是否为素数 例10：求最小公倍数和最大公约数 例11：口令验证 例12：字符串逆序输出 例13：规则图案 规则图案-乘法表 例14：输入数据 本专题所涉及的章节 第三章 第一节、第二节 第四章 第一节、第三节 预习：第四章第二节 * ——循环结构程序设计 第三章 第一节、第二节 第四章 第一节、第三节 格式： IF 条件表达式 [ THEN ] 语句系列1 [ELSE 语句系列 2] ENDIF 注：IF和ENDIF必须配对使用 DO CASE CASE 条件表达式1 语句系列1 CASE 条件表达式2 语句系列2 … CASE 条件表达式 n 语句系列n [ OTHERWISE 语句系列 n+1 ] ENDCASE 注：DO CASE和ENDCASE必须配对使用 y=零壹贰叁肆伍陆柒捌玖 p=substr(y,2*x+1,2) ?x,-,p input 请输入数字： to x do case case x=0 p=零 case x=1 p=壹 ………….. case x=9 p=玖 otherwise p=无效输入！ endcase ?x,-,p input a= to a input b= to b input c= to c d=max(a,b,c) e=min(a,b,c) f=a+b+c-d-e ?d