第6章节结构化程序设计”.pptVIP

循环嵌套经典例题： 1、水仙花数：该数为一个3位数，且各位数字的立方和刚好等于该数，如 1^3 + 5^3 + 3^3=153 则153为水仙花数 2、闰年判断：四年一闰,百年不闰,四百年再闰 (1)能被4整除而不能被100整除（2004年是闰年,1900年不是） (2)能被400整除（2000年是闰年） 3、百元买百鸡：公鸡5元/只，母鸡3元/只，小鸡1元/3只，100元刚好买100只鸡，有哪些买法 4、猜灯谜： A B C D - C D C ------------- A B C 5、图形输出：以*组成各类图形输出： 6、九九乘法表： 7、杨辉三角： 8、素数判断：只能被1和自己本身整除的数： 9、最大公约数和最小公倍数： 【例】编程输出杨辉三角 6.3 过程及过程调用 Visual FoxPro与其他高级语言一样，支持结构化程序设计方法，允许将若干命令或语句组合在一起作为整体调用，这些可独立存在并可整体调用的命令语句组合称为过程。 1、调用过程语句，即执行已有的过程。 语句格式： DO 〈过程名〉 WITH 参数表  语句功能：执行以〈过程名〉为名的过程 2、过程返回语句，即返回过程的调用处。 语句格式： RETURN［TO MASTER｜TO〈过程名〉］ 语句功能：将控制返回到调用程序中调用命令的下一语句 6.3.1 外部过程 外部过程：也叫子程序，是以程序文件（.PRG）的形式存储的 【例】分别建立如下程序文件:? 6.3.2 内部过程 内部过程：把多个过程组织在一个文件中 【例】建立如下程序文件： 6.3.3 过程调用中的参数传递 1．有参过程中的形式参数定义 有参过程中的形式参数定义语句为： 【格式】PARAMETERS 参数表 【说明】该语句必需是过程中第一条语句 2．程序与被调用过程间的参数传递 （1）DO命令参数表中参数称为实际参数 PARAMATERS命令参数表中的参数称为形式参数 （2）实际参数可以是任意合法表达式，形式参数是过程中的局部变量，用来接收对应实际参数的值；在实际应用中，两个参数表中的参数必须相容，即个数相同，类型和位置一一对应； （3）Visual FoxPro的参数传递规则为：如果实际参数是常数或表达式则传值，如果实际参数是变量则传址，即传递的不是实参变量的值而是实参变量的地址，这样，过程中对形参变量值的改变也将使实参变量值改变。如果实参是内存变量而又希望进行值传递，可以用圆括号将该内存变量括起来，强制该变量以值方式传递数据 【例】用参数传递编程，计算圆的面积。 * 主程序 SET TALK OFF CLEAR S=0 INPUT ”请输入圆的半径:” TO R DO AREA WITH R,S ? ”圆的面积为:”,S SET TALK ON ? * 子程序 PROCEDURE AREA 计算面积的过程 PARAMETER X,Y 形参说明 Y=pi()*X^2 RETURN 【思考】计算1！+2！+3！+…+n！ * 目 录 上一页 下一页 退 出 要 点 * 目 录 上一页 下一页 退 出 要 点 1 1 1 1 2 1 1 3 3 1 1 4 6 4 1 1 5 10 10 5 1 规律： 1、等边直角三角形 2、第 N 行的第 1 列和第 N 列为 1 3、除规律2外其他所有数为它上面的数和它上面的数的前一个数的和 input Please input a number: to m dimension a(m,m) for i=1 to m for j=1 to i if j=1 or i=j a(i,j)=1 else a(i,j)=a(i-1,j-1)+a(i-1,j) endif next Next 各数组元素赋值 for i=1 to m for j=1 to i ??a(i,j) next ? next 输出方式一 for i=1 to m for j=1 to i @i+1,7*j say str(a(i,j),5) next ? next 输出方式二 * SUB1.PRG ? ”*” RETURN * MAIN.PRG SET TALK OFF For i=1 to 5 DO SUB1 Ne