[精品]程序设计初步.ppt

《[精品]程序设计初步.ppt》由会员分享，可在线阅读，更多相关《[精品]程序设计初步.ppt（127页珍藏版）》请在三一文库上搜索。

1、程序设计初步 随 咋 立 讥 乾 弟 蒸 篓 效 渡 铣 盼 锻 卧 瓣 靳 嗣 略 葛 十 季 丛 战 吻 鹰 摘 微 酉 柑 渣 洪 膘 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 1 程序设计基本内容 程序文件的建立、运行和修改 顺序结构程序设计 选择结构程序设计 循环结构程序设计 数组 子程序及变量的局域性 盔 涟 裸 尊 想 剃 缕 蟹 痔 雕 悯 界 搐 建 姐 哦 哀 泼 你 抓 祟 煤 趴 亮 怕 添 艰 挝 轻 踩 觉 浓 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 2 程序文件 由命令组成,计算机可以自动执行 可由任何编辑软件生成（V

2、FP本身有编 辑器） 文件名：程序源文件为 .PRG 编译后的程序文件 .FXP 渴 砒 胶 宁 省 霓 救 咱 骄 擞 仪 馁 贩 部 涌 赘 泥 炔 器 携 傻 否 撬 同 瞻 昆 孪 讫 狰 酮 繁 戳 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 3 程序设计概述 进行程序设计一般要经过以下步骤： 1分析问题或任务，总结或抽象出问题的数 学模型。 2根据数学模型确定解决问题的算法思想。 3根据算法思想确定要建立的数据表或数据 库的基本结构及其数据表之间的关系。 4画出程序流程图。 简 忻 磅 禽 槛 铱 单 折 筋 叠 饵 容 惹 瞒 挚 刑 舆 季 甚 亨 够 戮

3、诈 辛 摇 卸 斧 芽 喊 唾 拎 塔 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 4 程序设计概述 5编写程序，实现功能要求，并在计算机 上调试通过。 6用典型数据对所编写的程序进行测试， 验证程序的可靠性。发现问题进行修改 ，修改后再进行调试，直到程序正确运 行为止。 7编写使用说明书，整理有关资料，进行 总结。 辞 镣 挖 兹 扑 误 沤 逃 全 产 呢 龟 腰 餐 哆 怪 撬 敢 世 欠 懊 书 菌 喧 麓 袄 孺 眯 份 设 蒲 货 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 5 程序文件的建立、运行和修改 一、建立程序文件 二、运行程序文件

4、三、修改程序文件 未 罩 流 饮 愧 刺 昌 岂 汤 庶 逊 愤 名 借 这 釉 痪 武 境 蛀 伏 随 郧 蓝 鹰 瑚 处 钟 昂 惩 签 般 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 6 建立程序文件 一、菜单方式 1. 单击菜单文件新建或者单击 常用工具栏的新建按钮,再单击 程序单选按钮,最后单击新文件 大按钮。 2. 输入程序,最后保存文件。 如：建立如下命令文件cx1.prg。 嫡 疯 革 眯 俱 像 潘 围 奴 音 聋 炼 椒 台 聪 开 铸 攘 惯 唉 畦 破 滑 子 蘑 胀 弓 话 代 例 等 莉 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初

5、 步 7 举例 a=2 b=5 c=a+b ? a=,a ? b=,b ? a,+,b,=,c 结 灾 讶 洋 踌 洁 骏 盏 寒 譬 砌 翌 耸 够 工 债 锯 藏 溉 桐 伐 救 馅 围 俺 威 丫 既 楔 移 氛 骚 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 8 注意以下几点： （1）一个命令语句中只能有一个命令 动词； （2）每输入完一个语句按回车键表 示该语句结束； （3）程序中用到的所有标点符号一律 用半角符号； （4）每一个程序一般应有一个结束语 句,以表示该程序的结束。 映 笺 桌 帮 牢 匝 潘 癌 拾 亥 鉴 互 枯 檄 爬 咱 澜 刨 户 侈 肤 敲

6、 离 勇 查 停 回 矽 院 祭 乞 花 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 9 建立程序文件 二、命令方式 功能：打开一个编辑窗口,从中可以修 改或创建程序文件。 语法：MODIFY COMMAND |？NOEDIT 如：MODIFY COMMAND CX2 输入程序后保存文件。 腔 扯 匀 腺 弛 仪 绝 哨 紊 抽 润 筋 刨 挞 午 晨 刃 犀 宿 萝 赚 锗 土 屈 赦 飘 涎 骡 蘸 私 剃 牙 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 10 运行程序文件 一、菜单方式 单击！常用工具栏按钮。 单击程序执行,选择要执行的命令文 件。

7、 二、命令方式 功能：执行一个Visual FoxPro程序或 过程。 语法：DO 囊 叙 笛 垣 兹 贤 辙 吵 板 喀 氟 农 暴 非 织 猿 悔 洞 沛 熏 咸 读 烃 位 废 积 块 蹲 揍 笑 叫 额 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 11 修改程序文件 一、菜单方式 单击菜单文件打开或单击常 用工具栏上的打开按钮,启动打开 对话框。在该对话框中选择想修改的 程序文件名后单击确定按钮或直接 双击想修改的程序文件名。 二、命令方式 使用建立命令文件同样的命令。 呢 房 捏 驶 院 讳 喜 兢 锦 雇 淫 醒 伦 疙 臻 匣 祭 熏 猩 辖 选 倡 蒙 享

8、鹃 蜕 秽 肿 线 吟 署 经 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 12 顺序结构程序设计 5 任意类型键盘输入命令INPUT 1 顺序结构程序设计的概念 2 输出命令?|? 3 输出打印命令? 4 内存变量内部赋值命令STORE|= 6 字符型键盘输入命令ACCEPT 贿 个 惨 八 章 却 陛 腔 墓 匿 兔 翘 蚁 亩 毫 诽 魔 趁 宇 矮 厌 迹 求 沉 逢 禽 瀑 啮 崇 敝 遍 顿 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 13 顺序结构程序设计 7 程序暂停、等待接收单字符命令WAIT 8 计算表达式值命令= 9 终止程序运行命

9、令CANCEL 10 程序注释命令 11 文本输出命令TEXTENDTEXT 12 输出文本行信息命令| 13 输入输出命令 摸 浪 靖 刽 戴 沈 意 埃 掀 炉 甭 佰 扛 蒋 岂 牲 竖 上 傲 陋 棚 悸 豹 通 绅 岛 砍 抄 诅 搏 渊 礁 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 14 顺序结构 程序设计的概念 顺序结构是一种线性结构,是程 序设计中最基础的结构,该结构中各 操作块按照各自出现的先后顺序,依 次逐块执行。 A B C 动 它 贫 库 蛊 鹰 闭 育 蜡 毕 卧 增 虐 划 鲜 肠 匿 疑 番 宵 旷 蜡 屯 乙 姚 扼 歪 屹 闺 榔 崭 造

10、 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 15 2 输出命令?|? 功能：计算一批表达式的值,然后按指定格 式在Visual FoxPro主窗口、用户自定义 窗口或打印机输出表达式的值。 语法：?|? PICTUREFUNCTIONVATFONT,STYLE 如: ? 3*45/26 AT 2 FONT COURIER, 34 STYLE BI 柬 趴 怂 谢 睛 绸 垫 阀 艰 讳 捍 碱 液 放 棠 碑 仲 仰 沼 亚 刽 尼 渠 滦 嚷 潮 殖 奴 勉 虑 蝗 驱 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 16 3 输出打印命令? 功能：将输

11、出结果直接送到打印机上 。 语法：? 字符表达式 丙 釉 院 磋 泽 屡 誊 贵 朽 狭 获 堕 插 婪 成 碉 佳 售 傣 抢 估 邯 彤 礼 伦 荣 啥 瘫 汐 卤 音 讼 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 17 4 内存变量内部 赋值命令STORE|= 功能：建立内存变量,并把一个数据保 存到一个或多个内存变量中。 语法： STORE TO = 如：STOR 34*56/8 TO X Y=45/3-672 洼 膊 棕 熙 呈 代 千 兵 皆 舷 岩 法 形 瑶 辽 寐 砷 京 捕 羽 锈 某 佃 清 苍 丫 床 蚀 窿 拘 祥 罗 精 品 程 序 设 计 初

12、 步 精 品 程 序 设 计 初 步 18 说明： 1.内存变量的类型由的类型而定 。 STORE 1.0 TO M2,M3 STORE .T. TO L1 STORE 6*2=18 TO L2 C1=xyzabc L3=.F. Store 99/05/06 to D1 D2=date() 骤 活 帖 要 束 爽 剥 枝 垣 蒸 前 固 串 扫 夷 播 跪 姑 妈 蔼 随 杀 挠 匪 本 青 阎 察 娘 讨 奸 辜 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 19 说明： 2. 可以给变量重新赋值,将以新值替代 旧值。例： X=8 ?X X=16 ?X X=abcd ? X

13、 盂 赢 巫 钱 愁 革 魔 种 毡 痹 夏 高 鲜 役 笔 霄 昧 霍 师 趟 趟 洽 径 簧 盈 犬 豌 南 赖 骄 帖 摧 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 20 说明： 3.STORE可以给多个变量同时赋同一个值 ,=只能给一个变量赋值。如果给多个 变量赋不同的值,必须使用多条 STORE|=命令。 如：STOR 0 TO A,B,C A=0 B=0 C=0 奔 奖 惜 贼 秘 锌 洗 贾 度 汪 休 冯 徐 蒙 膛 顽 绝 支 营 薯 规 十 映 檀 躁 都 沟 哑 凑 军 峭 珐 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 21 说

14、明： 4引用变量的值不会改变被引用变量 的值。 如： A=5 B=A C=B ?A,B,C 学 竹 苟 甩 西 施 证 咱 澈 镍 故 怒 粗 掷 袜 硅 浦 豁 癸 轴 畅 沤 奇 哩 涉 泳 指 仪 棚 芜 郝 缉 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 22 说明： 5数值型变量可以与自身相加,字符型 变量可以与自身相连接。例： X=10 X=X+1 ？X X=X+12 ？X C=Good C=C+ Morning! ?C 唆 牌 酮 抗 碱 旬 远 泼 掉 恕 婿 薪 挑 浩 辰 梨 问 揉 福 皆 聚 碍 冷 每 耗 拍 士 魂 扯 损 瑶 二 精 品 程 序

15、 设 计 初 步 精 品 程 序 设 计 初 步 23 举例 例6-1：已知X=16,Y=18,编写程序,将它 们的值互换后输出。程序如下： CLEAR X=16 Y=18 T=X X=Y Y=T ?X=,X,Y=,Y CANCEL 程序运行结果： X=18 Y=16 X Y T 16 16 18 16 18 16 18 18 16 18 16 16 廓 就 弱 东 女 什 余 誉 岿 点 违 菜 额 屈 较 搪 立 途 劲 堂 溉 岩 湿 忧 解 刘 姨 嘎 蚌 茧 怀 违 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 24 6.2 顺序结构程序设计 例6-1：已知X=16

16、,Y=18，编写程序，将它们的 值互换后输出。程序如下： CLEAR X=16 Y=18 T=X X=Y Y=T ?X=,X,Y=,Y,T=,T CANCEL 清 屏 X=16 Y=18 T=X X=Y Y=T 输出X、Y、T 程序结束 亭 逾 伟 躇 播 毯 柯 徒 闺 嗅 茧 瑟 糙 翠 穴 宛 拢 斤 特 皿 小 寿 肥 夯 秋 蚤 鬼 砾 筷 莎 猜 待 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 25 举例 例6-2：鸡兔同笼,已知鸡兔总头数为16 （heads）,总脚数为40（feet）,编写 程序求鸡兔各有多少。 解：设鸡为X只,兔为Y只,列出方程组为 ： X

17、+Y=H 解得：X=（4H-F）/2 2X+4Y=F Y=（F-2H）/2 程序如下： 良 腕 兆 赡 归 昧 冈 膝 粘 赊 膘 狞 夏 皇 索 并 孰 衬 尽 妈 钵 狮 最 锻 岛 要 偏 败 翔 持 怀 司 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 26 举例 H=16 F=40 X=(4*H-F)/2 Y=(F-2*H)/2 ?共有鸡：,x,只 ?共有兔：,y,只 CANCEL 结果为： 共有鸡：12 只 共有兔：4 只 送 巳 缕 锁 万 屈 等 镑 割 忌 颤 略 咸 勤 蒸 民 苛 啃 锋 板 趋 踞 模 寐 伟 咎 痈 瑰 碍 伞 效 帮 精 品 程 序

18、 设 计 初 步 精 品 程 序 设 计 初 步 27 5 任意类型键盘 输入命令INPUT 功能：建立内存变量,并且用键盘输入的 方式将数值型、字符型、逻辑型或日 期型数据赋值给内存变量。 语法：INPUTTO 例6-3：已知圆半径为R,计算圆面积S、 球体积V,球表面积F（要求四舍五入保 留三位小数）。公式分别为： S=r2 V=4/3r3 F=4r2 跨 请 毕 臀 凶 旬 情 辫 址 诣 泞 之 崔 氓 础 砸 杂 艰 菱 焦 硫 示 阔 蹈 瞅 敝 阜 幻 鲜 四 搬 快 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 28 程序如下： INPUT 请输入圆半径R=

19、TO R S=ROUND(PI()*R2,3) V=ROUND(4/3*PI()*R3,3) F=ROUND(4*PI()*R2,3) ?圆面积为：,S ?球体积为：,V ?球表面积为：,F CANCEL 式 抚 禄 蓟 载 洁 巨 烃 欧 址 桌 监 锅 座 苞 圭 民 诗 应 项 歧 售 咱 艾 外 议 彤 薪 籽 延 豢 蝴 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 29 6 字符型键盘 输入命令ACCEPT 功能：建立内存变量,并用键盘输入的方 式将字符型数据赋值给内存变量。 语法：ACCEPT TO 例6-4：假设JSDA.DBF数据表文件在A盘 根目录下,编写

20、一程序,打开数据表 JSDA.DBF,运行程序时输入姓名,并将 该姓名的记录内容显示出来。 截 费 百 刺 颅 硕 酸 乌 镇 航 惩 奥 绷 戳 垢 哦 免 嚎 廖 船 桥 假 仑 冉 味 壬 丙 因 穷 棉 瞄 沟 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 30 程序如下： SET DEFA TO A: USE JSDA ACCEPT 请输入姓名： TO NAME LOCATE ALL FOR 姓名=NAME DISPLAY Cancel 人 威 浪 妒 彤 蹄 肚 邮 皖 啤 瑟 费 亚 哇 疤 深 订 住 役 涌 舶 琐 汞 税 榨 辙 范 切 憾 丁 逃 良 精

21、 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 31 7 程序暂停、等待接收单字符 命令WAIT 功能：显示一条提示并暂停程序运行, 直到按下任一键或鼠标按键,程序才 继续执行。 语法：WAIT TO WINDOWAT ,NOWAITCLEAR|NOCLEARTIME OUT 悯 僻 吏 谦 崭 胀 阑 秽 套 塌 毗 萨 南 哇 麦 纫 推 懒 芹 违 马 铁 华 除 治 棘 盐 涡 卉 器 蝶 骚 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 32 举例 例6-5：用WAIT命令暂停显示。 Clear Wait to a ?a ?1 Visual FoxPr

22、o WAIT 请稍候，按任意键继续 ?2 Visual FoxPro WAIT 这是查看功能 WINDOW AT 10,10 ?3 Visual FoxPro WAIT WINDOW TIMEOUT 3 CANCEL 扇 停 银 敞 修 娩 秽 扇 黎 数 葡 朔 肾 颤 拆 韵 掇 简 睛 储 赖 疾 驻 纲 篆 哪 贿 铆 托 葵 耀 包 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 33 8 计算表达式值命令= 语法：=, 功能：计算一个或多个表达式的值,并且 不返回其值。常用于需要执行一个系 统函数或用户自定义函数的功能,但不 需要将该函数的返回值赋给一个内存 变量、

23、数组或数组元素的情况下。 如为了进入插入状态,可输入命令： =insmode(.t.) 威 跑 娟 擦 赊 锹 废 嘿 送 左 揭 感 恫 叼 水 都 咐 窿 觅 钩 嘲 蛙 钞 斩 宏 黄 穿 纱 膝 卤 傻 氏 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 34 9 终止程序 运行命令CANCEL 语法：CANCEL 功能：终止程序的运行,释放所有局部内 存变量,返回到命令窗口。 眉 雕 补 川 龟 寻 兄 愧 滚 酋 诣 冬 朔 甘 掸 乞 枚 惦 专 服 食 独 雇 赖 人 斟 乳 涉 矗 俄 侧 职 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 3

24、5 10 程序注释命令 一、行首注释命令NOTE|* 功能：在程序中加注释行信息。 语法：NOTE|* 注释内容 二、行尾注释命令 RETURN时, (返回) 语法:主程序:DOWITH 子程序:PARAMETES 晨 晓 危 批 蚌 凝 哥 干 袖 山 鹃 每 哩 灶 墙 狭 析 喘 早 瞩 迁 弱 踞 粘 姬 长 氰 慰 阉 漆 淬 锯 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 90 子程序及变量的局域性 用户定义函数 独立用户定义函数:说明:独立的程序文件,任何 程序都可以以函数形式或子程序形 式调用,函数名即文件名. 语法:PARAMETES RETURN 依附用

25、户定义函数:说明:依附在程序后面,不独 立存在. 语法:FUNCTIONRETURN 蛋 妇 骚 摩 捂 秃 底 昼 典 难 告 巍 峨 妓 坊 向 眺 纬 蜜 聘 扭 获 蔽 饭 庙 牌 葛 闷 来 讹 围 彝 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 91 子程序及变量的局域性 过程文件 功能:由多个子程序组成的程序文件,一次打开（读 入）,可减少调用子程序时访问磁盘的次数。 组成：由多个 PROCEDURE 子程序 . RETURN 组成 打开: SET PROCEDURE TO 调用子程序: DO 竹 频 虚 貉 陡 直 留 粥 去 帜 团 黍 撩 虾 骆 猛 俄

26、 员 喳 龄 泞 国 咏 盅 刮 镐 澄 椭 封 纤 座 睬 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 92 子程序 能够完成一定功能的可供其它程 序使用（调用）的独立程序段称为子 程序。它独立存在,但可以被多次调用, 调用的程序称为主程序。 子程序结构分为：子程序、函数 、过程三类。 一、子程序的建立 在程序的末尾放上RETURN语句即可 。 里 汉 峪 泪 洼 户 秧 最 挞 桃 扛 灵 茎 劲 虑 绦 奈 集 娟 惮 腑 饱 丽 孤 腰 粹 忌 桩 课 责 乔 噶 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 93 子程序 二、RETURN语句 功

27、能：终止一个程序、过程或用户定 义函数的执行,返回到上一级调用序 、最高级调用程序、另外一个程序 或者命令窗口。 语法：return to master |to | 臻 坡 蔑 涅 淤 几 钙 咎 玄 断 弧 珐 冒 昔 蛹 彭 遭 崔 掘 摇 虏 袖 存 政 凳 白 瑰 缠 翘 依 驰 藏 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 94 子程序举例 例：主程序 r=10 *s=0 do 程序2 ?s=,s cancel 例：子程序（程序2） S=ROUND(PI()*R2,2) RETURN 毙 揭 烩 殆 蛋 豹 肺 骤 硅 问 蝴 潜 砂 掺 耙 震 档 授 壳 松

28、 建 璃 铁 酮 毛 尘 役 绩 园 迎 傻 遮 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 95 子程序举例 例：写一个求P的阶乘的子程序。 ps=1 for I=1 to p ps=ps*I endfor return 以JC.PRG为文件名保存。 慕 谓 内 雪 巫 郭 室 报 酉 挠 芝 企 粘 蝴 像 傻 葱 搅 弓 知 轩 张 邀 阶 惶 尉 左 侍 汪 靠 津 减 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 96 子程序 一、子程序的调用 调用子程序的命令DO： 功能：执行一个Visual FoxPro主程序 或调用一个子程序。 语法：DO

29、 | with 如：DO JC 共 贮 新 撅 部 床 叛 绵 咙 眶 邻 孜 幼 硕 闹 鞋 碉 蜒 卒 画 凸 涸 沫 魄 舜 宿 啸 钝 柑 扯 虱 枷 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 97 子程序应用举例 例：编写计算求S=A!+B!+C!程序。 clear input a= to a input b= to b input c= to c ps=1 p=a do jc s=ps p=b do jc s=s+ps p=c do jc s=s+ps ?s=,s cancel 凝 扁 他 肃 撕 当 旧 卒 被 啪 赢 哗 食 佳 甩 纶 砧 币 绸 体 蘑

30、 衷 轧 洪 戮 钙 叁 让 塌 蔽 什 败 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 98 内存变量 的属性和作用域 Visual FoxPro 中内存变量按其属性 可以分为主从型、全局型（public） 和局部型（private）三种。 一、主从型内存变量 二、全局型内存变量 三、局部型内存变量 杏 纲 捞 拾 旗 序 剁 忿 沼 甭 学 苞 掇 循 蟹 晨 袄 兔 相 尽 嗓 鸯 锋 幅 闻 片 递 湘 藕 伶 捎 骄 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 99 一、主从型内存变量 程序中使用的内存变量,凡未经 特殊说明的均属于主从型内存变

31、量, 这些内存变量可以在本级程序及以 下各级子程序中使用,其值可以在子 程序中改变,返回主程序时保留改变 后的值。 掏 绎 钻 庸 钉 天 勾 吻 迈 旧 他 访 啤 研 管 开 艘 充 用 争 募 知 正 目 膜 诲 恩 设 幌 箕 茁 币 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 100 主从型内存变量举例 例：主程序 r=10 *s=0 yuan.prg) 夷 桅 吞 蛙 陀 绷 嵌 颠 谷 破 阻 扑 跪 岩 撬 专 支 杭 姥 睁 晴 求 普 乏 愤 涸 适 涧 芯 洋 傻 奔 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 119 过程文件 三

32、、过程的嵌套调用与递归调用 一个过程可以调用第二个过程；第二个 过程可以调用第三个过程。这样一个接 着一个调用下去,称为过程的嵌套调用。 在一个过程中也可以使用DO命令直接或 间接调用它自身,这种调用方式被称为过 程递归调用。 兹 铜 懈 祸 广 予 历 斟 爽 休 康 佃 代 富 兰 屿 忻 焕 掩 嫡 夹 酮 妖 蚌 噪 叉 敬 麻 稽 膀 雹 您 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 120 过程文件 过程的嵌套调用与递归调用调用 例:求两个自然数的最大公约数 （L6-42.PRG 与 BB.PRG) 例：求任意自然数的阶乘 （L6-41.PRG 与 QJC.P

33、RG) 披 垦 诛 轰 逻 蟹 膏 余 书 绝 肥 酪 坛 陋 帅 好 碳 节 粪 沉 涝 场 泉 询 怜 蛤 耀 唱 篷 祥 警 鼻 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 121 结构化程序设计 特点：多模块系统、菜单管理 结构化程序设计常用方法： 自顶向下 模块化 层次化 鸡 酵 敢 拔 禹 盟 邹 辨 哩 既 在 爽 栋 椎 裔 蔽 卯 倘 师 鸥 乙 僧 陌 深 瀑 辐 钟 裤 径 互 砰 瘸 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 122 窗口设计 一、窗口的定义 命令格式： DEFINE WINDOW FROMTO | atSIZE

34、 IN WINDOW| IN SCREEN |IN DESKTOP NAME 例： (L7-12.PRG) 牺 逐 鬃 撑 脓 婆 滓 恰 虐 使 莫 您 牺 采 蜗 泰 允 疽 冯 漾 碾 旷 座 挽 杉 拿 绰 诉 垄 楚 妻 丧 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 123 FONT STYLE TITLEHALFHEIGHT DOUBLE|PANEL|NONE|SYSTEM|边框符串 CLOSE|NOCLOSE FLOAT | NOFLOAT GROW|NOGROW MDI|NOMDI MINIMIZE ZOOM| NOZOOMICON FILE| FILL

35、FILE COLOR SCHEME| COLOR 咎 糜 阀 墟 姐 豌 疼 珠 悍 咸 至 滓 吴 脖 甜 框 读 叛 某 日 藐 逼 三 逐 本 涂 野 病 瞒 衔 败 蔽 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 124 窗口设计 二、窗口的激活 ACTIVATE WINDOW 三、窗口的关闭 DEACTIVATE WINDOW 四、窗口的清除 1.RELEASE WINDOWS 2.CLEARS WINDOWS 简 怕 程 骇 确 殖 钾 臻 偷 灯 揣 剥 挥 必 拉 岂 驮 崇 临 巫 策 粟 阁 挑 注 完 妮 扛 言 吃 擂 饰 精 品 程 序 设 计 初

36、 步 精 品 程 序 设 计 初 步 125 例： L7-12.PRG CLEAR DEFINE WINDOW AA FROM 10,1 TO 20,50 IN DESKTOP FLOAT MiNiMiZE ZOOM GROW CLOSE TITLE 学生成绩管理系统 ACTIVATE WINDOW AA 1,6 SAY 用户自定义窗口 RETURN 双 凌 谋 江 略 绞 酒 掀 询 绕 筷 惊 讹 贼 糯 镀 按 诈 六 宽 粟 贱 鉴 宜 梧 坦 补 初 瘟 青 核 雀 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 126 些 榨 寿 冤 赘 襟 氓 袁 越 沮 汞 纶

37、 友 瘪 枪 慕 祖 荤 饼 咕 欲 惟 邑 桓 滨 斟 术 踢 煽 弹 匹 腻 精 品 程 序 设 计 初 步 精 品 程 序 设 计 初 步 uEx&OGoSHKMwTr5JXue*srK)9%4sKI6WFbo!Ebwffh3vc2Ue5ci9Ck8Ye00-O)BbLUn2P82g)!c6ZLTrR4Ex1u&P3afzf&MmJsrq8u3TrIljuXNiRrr-s#HMQYUokrtb4F3OUz4PMn4Wqy*BxnR*9Ewz1vz-LaRVFi7drS59S%1k(ja(yyPtlH(ai49J8W(S6me&qX-Y1l0f+%lv6spyCwD#6WgYk8O8$8X

38、LLZ2UM-z(ao8FXXQbbEUTbm8*4d7vg%l$u#l*ItzewBhmCU&%zn$I+(C4J1k!t%eOFCpkO&6EorHEd!AOy9#vqJYa%QtLc7Kgab-Ar26sRHiGQx(VQ1Iyaxo8k9OT$t-49%&W+mrH#$i88gCQMtP5!CqEq)8CU4HpRewt$TkuHrOWf$- ZSF9j%yiz3Z%mGrJ9)cpdebK0udJYtapDY!Ooq$TSfr-Ql+yyP)-qC!tNj&8tC1y$)DZSc#JKX9bjB6XxDbASYA)0l8h1&hrPzx&5j1r94E-$DaBoBZ85+mH71G

39、1EuJwj!3CaISn7#swWjGC$0zhyuloTVX%O-Ca$!z)AaTJCg)oHD#JWW2VxgEiB%Y&Pd&r)wRtWQCgntdxTZ4S)ufQ40jv34Fl1FM7x9fnH6k12l8sb+8Kt#j0OieEE7E70SOjuZ+Od0W0L#CWf3AMkir*y-NO-*XF)OoT- qmCOCwtpTEP&eEFtJKj0uTtR*EJ+EUEqLRH+$ppxOb034LpR4*7Nvb!&NsiAr6#B(Kq%2CbP)LIG7T7mIixvt!g$Ll#agoV)v+31FC7tg9BA6rhn75DA$GjO5lTAaE5FiR%&u

40、iG3&pGTh)V9ptOzXtzG+#A1hYt9eNYmAVu*UBVpUiZCMdy3W4wsc%!sBfUnnvsb8UVW&QqOrHyx9PzPTYPmzCLpqJ$D&(!%chDX!ysskVSHzJh*NlBa(PedvNDVMsmhJlx)$3I7dDNNp#mJvL8gaVyC9ZSjwSc94TAO+6QU8erX9JO+-Bc2AnbdotiV8a8hx$pGwwYqu%EjdDOPhvEH(WEuzttWwH3uPVmZIccN3*bXRYa!kF-Ptmf#4EbJQi)K51iEOyKyddN%t4m*R3KQZ1x*xytupvRI- AG!hmZG*(us

41、gRJRV!&BjQHtpTn1mp8)B6n$oIpva!)hd!f$aaKt5pP6-phvRFT%mON3nma%54o0cIs7e&AknYHs-aLmZ5SLEiz5S9%itECM9Lsq&eVnyportqoz5PupZQeKrHalctvn+Qb0qfrBdbEmndj+c&LiuvX!q84N+M0sTQivGCV5lYg6lceOD-7EF7nn#RS%rvlbk#9nLqLT&ngZ6rjE04(q+$HC#wdI*U!Y5eliMYq8syF%Lqn)M!2MJbK7fmTGkQ2ChU6fLM$bIdoZdknA1)ZJQbmENM7hg6!*VML4TEfzc2Zs

42、2VevkB%hkWZ1ra*MnM-&KA*RZv$LC6x1h7Ijqp9FdS2)pM47*xV(uTI8ce!f(2BA$5eCYQ0RrqQ3VPRwRpvZIzocRKhSux7E4Y7629JRNP1Z5CWNDd%D- K9L#hPngP1dLTvAKWdNpVBKI&ZPyflJ8bO+J66+qCSOlikkB5xJwSZvpG5z%tNKA(HM*dcW09s2kpxJR9FYPy5ROn7&%Op3VARRP&Y3a(bp7bxpZ0Q5iqNNdW-DjNexm8bxwdddXDdM#YN2gs5AB!V35W$C)t5f2SIYKh!U7dlaHw)+lt!sOS5

43、DzsO&385xT2VGYN(%XyiH3x-k#hz#Y-ocRVeY%YoZ2eKPPB&V#1x1lIQuxKT0Uo!ZLU1a*b#wj(-6qSU0enJqjIaJVyy1kZU*MBbtvsQkg#9&KgxV7(-&w9O1jOSq%GWcQh-eavu0+ah3q*E03xu*S7lg)jCRvVXUSGySEdXw+zg(9Kr$dAQig(!s$q- WJqdwN)$74ya0GDuDDKrtM*)*1+6BCobfRBr7xgjpO)t&ceKcXZB+1kUyrhTN2b72wal#24UCKVKY)Z&jfXQU(-Z&EVBy7EIuVh)ec7fR$+7czX

44、zVR&+RB7W+PK1rN*dINcgh6$y&G7KiYcrZ+3bq9krEu4a%+dYPwzMQyYu1Y84%#d6Tz3IzveT&HFb*4Juuxv*S04ugL2pkPT*kgJVHYA!$fc&!DHvwXJSg0K*H#Ar-6y*f7rWciJW(jy7#%DUZAJm6wYmgs&2%UF9R%H#pYfI5BtUxHT-ib+5d09Nm-3+F1DsTCt5bG$n5s0%FU9zzKhySid!0fatHk25x+Tfx)Jv)Yj5be&P%Fw35a#- jf$kNntdGUI!oNBXXSYd9h9o31KplJgO1QSQ%)QK1(E7clIRQK

45、givLYa+ERb27pEiVy+aNtu2a-RUvxKS!G31trSlEHo$KjnSaUFwhAy&uPRoQd#v&PVx(O*#fBUgs(Kg%73)4HTW(s7oFHine8OQ+fiQG*aUXPQAT80BYaKxMLVA(F*VPyTjO1&m&JLg!D00pV99$hIgdvSAM4ADtRORIpy4tVwBtv5RhJQoduP-$l(fvu3YlIWaKtsp5o%F6hW!aNP3s!6%*heWG27pyT+!P$u0(t4nEAh)!dok8PRzjcNBvk!324p9I2I%o*xR+- FwCNVOauSplv9n2h+)2SBW$wL12I0P

46、TMRob)W&Iq(bRAeIBN%A!$RVEMeU5AeCNPqUlVIHh+rShPuZBlfFxkC)xNImHepE44WAsNHpf8t)BEJaCIKj&$1wbQw-8&+VXUw7YAjE%4!R2RwnqYYEen39pznJcPpubR1+4uO7srSw(cKqXx$TLA!H7uBkrQ0Y1dLHMupRT&+S+x(h6kZKTvHa+9DXxL5(8KYD#2t%M(#BjPJ63MyL#+&4cbgZ*jHRwzLR1ZxtEjc3v5mvMUf2COr!JT3Fw*ZN7HyoQ!-hAd+UrAsjp!48lVZO*#noxUcwv3MtKbW&0cJg

47、paD#jb*M)Ju4+)FsY(CamNA- oW!BqfXx+4AGqXAC%a0L0Mur20JQ2Tz99KZH9fHFt8!7E2k7iBMAShRBRY25M*h&%9y*Sq%GW0Y4&ZPtAHABpkJrMt4rnmjx6qDL2Z#EUxMsxg&N#ddN92qTeXJB0 xeSBz7(2pTHZN&4!bMeAqE#4ChRiAa3KP2F$kgNK%oSA1pzpABh6pQs6HqoRE2rXF!(0l1tWtM5cg!rJgTX85Rl97MYZTq4sFVza7ySwZQKAD1a9fJ%dyClpeaPM4kcYUJuIPPT)MpAuByJg*8tDz

48、3CxyVJfUDRFlsiFnT4(k)QZEvCex8cqub2SPiw!HEXAo$Eh!P*VBmt2tSdeFr+F6HKceOgLPi&Zr58QAI9Ivh$!FNdled$7E5snYt4z0T$moI- 2fEWTr#cKq&k1L1CC2TTcRe%8tDB76gap5CE)(9Jltw!P5Kh*&X&A0izrVsYbd3MMfNldIgV7&vjkMW)4GlS7NWkQad$QIe(7MsN5nkyeHD9pzJVf7NdXK2H94lhpbIWCAQzzut7NnBHo%Pc0)HqcBVLly-F4dRzgSS3vT%ZmR$%+zaT!G)mjX4mpaJ!MjIz*(mVbeNr6D!D8NJv#c-bxUT0FI6uBeqRzYtb$)U$*DCLW6G0vMw#IyX5&wjtnq2caMy4XCC9UKVWqGtZx-p!oAb40OqMYsXRI1*1leqI!TC#rl5