当前位置：文档之家 › 第7章(过程)

第7章(过程)

  • 格式：ppt
  • 大小：229.00 KB
  • 文档页数：34

下载文档原格式

  / 34

合集下载

第7章 水环境中的光化学过程

第7章 水环境中的光化学过程

三、光化学定律
1、 光化当量定律
1921年，爱因斯坦(Einstein)提出：
在光化学反应的初级过程中，被活化的分 子数(或原子数)等于吸收的光量子数，或者说 分子对光的吸收是单光子过程。
此定律又称爱因斯坦光化当量定律。
因为激发态分子寿命很短，(激发态分子存留时间一般小于10-8秒)，这
样激发态分子几乎不可能吸收第二个光子。
在外界条件（温度、压力）一定时，量子 产率主要决定于反应物性质和吸收光的波长。
3、初级量子产率和表观量子产率 光化学反应可以分为初级过程和次级过程。
举例：大气中氯化氢的光化学过程 HCl+hv H+Cl(初级过程，光化学反应，光分解) H+HClH2+Cl（次级过程，热化学反应） Cl+ClCl2（次级过程，热化学反应）
吸收光能后的激发态分子是不稳定的，可有许多途径失去能 激发态分子是不稳定的，可能发生下述变化： 量而成为稳定状态。
（1）发生离解： A*
B1 + B2 +…
（2）与其他分子碰撞反应： A* + B 光化学过程 C1+C2+…
（3）与惰性物质碰撞，返回基态： A* + M A+M （4）发出荧光，返回基态： A* A + hν 光物理过程：各激发态之间或激发态和基态之间相互转化的跃
水合电子是一种强还原剂, 它是被水分子团包围着的
裸露电子,化学性质十分活泼,是目前已知还原剂中的
最强者。除了氖和氦等个别物质外,水合电子几乎能与 任何元素及化合物发生化学反应。它还能与某些物质 合成许多极难合成的物质。
研究发现：水合电子是高能辐射危害人体主因
将对抗癌使用的放射疗法产生影响；需要对辐射剂量重新评估

第7章 传热过程的分析和计算

第7章 传热过程的分析和计算
总热阻Rk取得极小值时的保温层外径dx称为临界 绝缘直径, 用dc表示
Rk
1
d1lh1
1
21l
ln
d2 d1
1
2xl
ln
dx d2
1
dxlh2
dRk ddx
1
2x d x
1
d
2 x
h2
0
dc
2x
h2
临界绝缘直径与保温材料有关、与所处环境有关
dc
2x
h2
（1）当dx<dc时，随保温层厚度的增加，总热阻 减小，传热量增大，此时对管道敷设保温层反而
7.4.2 换热器热计算的基本方程
约定： 下标 1 —— 热流体 下标 2 —— 冷流体 上标 ’ —— 进口参数 上标 ’’ —— 出口参数 以热流体进口作为计算起点
1 换热器中流体的温度分布 因变量—冷、热流体的温度 自变量—？
换热面积 —热流体入口，Ax＝0 —热流体出口，Ax＝At —在换热器内的不同位置，Ax不同，流体温
★如何提高传热系数？
1
1
K
1 h1
1 h2
1 h1
1 h2
数学上可以证明
K min h1, h2
提高较小的表面传热系数值，强化薄弱环节， 效果最好
h1＝103，h2＝10，没有强化前：K=9.90 W/(m2.K)
❖ 措施1： h1＝2000，h2＝10： K’＝9.95 W/(m2.K)
7.2.1 通过平壁的传热过程 导热中—只关注平板的导热过程，计算了各类边
界条件下的温度分布、通过平板的导热量 传热过程中—壁面两侧流体间的热量传递过程
1 h1 A(t f 1 tW1)
2

第7章 马尔可夫链与泊松过程

第7章 马尔可夫链与泊松过程

为马氏链在时刻 m处于状态ai条件下, 在时刻 m n
转移到状态a j的转移概率.
说明: 转移概率具有特点

此矩阵的每一行元 素之和等于1.
Pij ( m , m n) 1, i 1,2,. j 1
由转移概率组成的矩阵
P(m, m n)( Pij (m, m n))
状态空间: I={0, 1}.
30
96 次状态转移的情况: 0 0, 8次;
0 1, 18次; 1 0, 18次; 1 1, 52次.
因此, 一步转移概率可用频率近似地表示为: 8 8 p00 P{ X n1 0 | X n 0} , 8 18 26 18 18 p01 P{ X n1 1 | X n 0} , 8 18 26 18 18 p10 P{ X n 1 0 | X n 1} , 18 52 70 52 52 p11 P{ X n 1 1 | X n 1} . 18 52 70
4
2. 马尔可夫过程的定义
具有马尔可夫性的随机过程称为马尔可夫过程. 用分布函数表述马尔可夫过程
设 I : 随机过程 { X (t ), t T } 的状态空间,
如果对时间t的任意n个数值,
tX t2 t n , X n ( T, 恰有 1 (tn )在条件 ti 3 ) ,tix 下的条件分布函数 i P{ X ( tn ) xn | X ( t1 ) x1 , X ( t2 ) x2 ,, X ( tn1 ) xn1 } X (tn )在条件X (tn1 ) xn1下的条件分布函数 5 P{ X ( tn ) xn | X ( tn1 ) xn1 }, xn R

第7章面向对象软件开发过程-UP介绍

第7章面向对象软件开发过程-UP介绍
10
§7a.2 UP的阶段（细化阶段，elaboration）
细化阶段的产出：
–用例模型（完成至少80％）……所有用例均 被识别，大多数用例描述被开发； –补充捕获非功能性要求和未关联于特定用例 要求的需求（补充规范） –软件体系结构描述 –可执行的软件原型 –经修订过的技术风险清单和商业案例 –总体项目的开发计划，包括粗粒度的项目计 划，显示迭代过程和对应的审核标准； –用户手册的初始版本（可选）
–进行β测试以期达到最终用户的需要； –β测试版本和旧系统的并轨； –转换功能数据库； –对最终用户和产品支持人员的培训； –提交给市场和产品销售部门； –和具体部署相关的工程活动； –协调bug修订、改进性能和可用性(usability）等工 作； –基于完整的构想和产品验收标准对最终部署做出评估； –达到用户要求的满意度； –达成各风险承担人对产品部署基线已经完成的共识； –达成各风险承担人对产品部署符合构想中标准的共识
23
§7a.4 核心工作流 –工作流是产生具有可观察结果的活动序列
24
§7a.4 核心工作流
25
§7a.4 核心工作流（商业建模）
商业建模
–大多数商业工程化的主要问题是软件工程人 员和商业工程人员之间不能正确地交流，这 导致了商业工程的产出没有作为软件开发输 入而正确地被使用，反之亦然。 –在商业建模中使用商业用例来文档化商业过 程，从而确保了组织中所有商业过程人员达 到共识。 –商业用例被分析以理解商业过程如何被业务 支持，而这些在商业对象模型中被核实。 –许多项目可能不进行商业建模。
26
§7a.4 核心工作流（需求）
需求
–是描述系统应“做什么”，并允许开发人员 和用户就该描述达成共识。
创建构想 建立用例模型

第07章存储过程和触发器

第07章存储过程和触发器

山东工商学院
陈章良
7.1.2 用户存储过程的创建与执行
（2）存储过程的执行 语 法 格 式
[ EXEC [ UTE ] ] { [ @return_status = ] { procedure_name [ ;number ] | @procedure_name_var } [ [ @parameter = ] { value | @variable [ OUTPUT ] | [ DEFAULT ] } [ ,...n ] [ WITH RECOMPILE ] ｝
山东工商学院
陈章良
7.1.4 用户存储过程的删除
语法格式
DROP PROCEDURE { procedure } [ ,...n ]
【例7.10】删除 PXSCJ数据库中的student_info1 存储过程。 USE PXSCJ GO DROP PROCEDURE student_info1
山东工商学院
CREATE PROCEDURE student_info AS SELECT a.xh,xm,kcm,cj,xf FROM XSB a JOIN CJB b ON a.xh=b.xh JOIN KCB t ON b.kch= t.kch GO
山东工商学院
陈章良
7.1.2 用户存储过程的创建与执行
3) 使用带OUTPUT参数的存储过程
山东工商学院
陈章良
7.1.2 用户存储过程的创建与执行
（3）举例 1) 设计简单的存储过程
【例7.1】从XSCJ USE PXSCJ 数据库的三个表中查 /*检查是否已存在同名的存储过程，若有，删除*/ 询，返回学生学号、 IF EXISTS (SELECT name FROM sysobjects WHERE name = 'student_info' AND type='P') 姓名、课程名、成绩、 DROP PROCEDURE student_info 学分。该存储过程不 GO 使用任何参数。 /*创建存储过程*/

第7章平稳过程的谱分析资料

第7章平稳过程的谱分析资料
sX () = N0 ( < < ) ，则称 X (t) 为白噪声过程。
相关函数：
RX
(
)

1
2

s
X
(
)
ei
d

N0
2
ei d


N0
(
)
[定义′] 称均值为零、相关函数 RX () = N0 () 的实平
稳过程为白噪声过程。
目录
7.4 联合平稳过程的互谱密度
频率响应与脉冲响应
对于线性时不变系统，输出 y (t) 等于输入 x (t)与单位 脉冲响应 h (t) 的卷积，
y(t) x(t) h(t)
傅式变换——输出频谱Y () 与输入频谱 X () 的关系：
Y () X () H ()
定理1
设L为线性时不变系统，当输入一个谐波信号 x(t)=eit 时，则输出为
对平稳随机序列 X n , n 0,1,2, ，均值为0，如果

| RX (n) |
n
当 在 [ , ] 上取值时，若

sX () RX (n)ein n
绝对一致收敛，则sX () 是[ , ] 上的连续函数，称

sX () RX (n)ein ,
L[a1x1(t) a2 x2 (t)] a1L[x1(t)] a2 L[x2 (t)] a1 y1(t) a2 y2 (t)
时不变系统： y(t ) L[x(t )]
下列微分算子和积分算子是线性时不变的
（1） （2）
L d dt
t
L ( )du

a0
2m

_fortran-第七章 过程


Fortran 提供了一个特定机制，使得可以在构建 最终的程序前容易地独立开发和调试子任务。 可以把每个子任务作为独立的程序单元来编码， 该独立程序单元被称为外部过程( external procedure) ，每个外部过程都可以独立于程序 中的其它子任务(过程)来进行编译、调试。 Fortran 中有两种外部过程:子程序 ( subroutine) 和函数子程序( function subprogram)(或者就叫函数， function)
7.1 子程序
SUBROUTINE 语句标志着子程序的开始，定义了子 程序名和相关参数表。子程序名必须遵循标准的 Fortran 命名规则由字母和数字组成，最大长度可以 到31 个字符，但第一个字符必须是字母。参数表含 有一系列变量和/或数组，这些变量、数组的值将从 调用程序传递给子程序。这些变量被称为形参 (dummy agument ，形式参数)，子程序实际上没有 为它们真正分配任何内存空间。对从调用程序单元传 递来的实际参数(实参)来说它们仅仅是占位符。
每个子程序是一个独立的程序单元，它开始于 SUBROUTINE 语句，结束于END SUBROUTINE 语句。 当程序调用子程序时，调用程序的执行暂时被 挂起，子程序执行部分开始运行。当运行到子 程序的RETURN 语句或END SUBROUTINE 语 句时，调用程序又开始运行调用子程序语句下 面的程序代码。 任何可执行程序单元都可以调用子程序，包括 另一个子程序。(但是，子程序不能调用它自 身，除非它被定义为递归类型(recursive) )。
Fortran95/2003程序设计
第七章 过程
本章学习目标: • 学习Fortran 语言中的过程如何帮助实现好的程序设 计 • 了解子程序与函数的不同 • 掌握创建和调用子程序 • 理解并学会使用INTENT 属性 • 理解使用地址传递方案实现变量传递 • 理解显式结构的形参数组、不定结构的形参数组和不 定大小的形参数组之间的区别 • 理解为什么不再使用不定大小的数组 • 掌握在过程之间使用模块实现共享数据 • 理解显式接口，以及为什么在模块内部定义过程更好 • 能创建并且调用用户自定义函数 • 掌握如何把Fortran 过程调用参数传递给其他过程。

第7章 降水过程


江南春雨期：3月下旬-5月上旬，江南地区（25-29N），雨
量较小。
华南前讯期：5月中旬-6月上旬（25天左右），华南，雨量
迅速增大
江淮梅雨：6月中-7月上旬（约20天），长江中下游，连阴
雨
华北和东北雨季：7月中旬-8月下旬（约40天），雨带停
滞在华北和东北地区，同时，华南又出现一个大雨带，为华 南后汛期降水
地形和摩擦对降水的影响（有利的地形） 两个作用：1）动力作用，2）云物理作用


地形的强迫抬升 地形的辐合和阻塞作用

喇叭口地形

地形还可起到触发作用

抬升运动或背风波促使潜在不稳定能量释放，激发重力波、 中尺度扰动。在背风波的上升气流处，气块抬升，不稳定能 量释放，有降水形成。
地形的云物理作用

华南前汛期暴雨结束的环流特征：

华南前汛期暴雨天气系统与天气型

天气系统


低层： 地面锋（静止锋与冷锋） 低空急流 低涡与切变线 边界层辐合 中高层： 南支槽和西风槽 中层气旋 锋面低槽型 锋面低空急流型 低涡锋面型

华南暴雨天气型


江淮梅雨（Mei-yu, Plum rain, Baiu, Mold rain, Tsuyu）

7.2 大范围降水的环流特征
暴雨：hard rain, torrential rain, storm rainfall, rain gush (gust), cloud-burst 我国主要暴雨带

华南前汛期暴雨(5月中-6月上) 梅雨暴雨(6月中-7月上) 北方暴雨(7月中-8月下)

地形可以改变降水形成的云雾物理过程，使得即应凝结的水 分，高效率的下降为雨，从而增加降水量。

第7章模锻工艺过程


7.1.3 螺旋压力机及其工艺过程特征
1—电动机 2—传送带 3、5—摩擦盘 4—轴 6—飞轮 7、10—连杆 8—大螺母 9—螺杆 11—挡块 12—滑块 13—手柄
摩擦压力机
• 摩擦压力机可单次打击，也可作连续打击。 • 摩擦压力机在动作过程中有两个明显的特征。 (1) 积蓄于飞轮的能量进行工作，与锻锤的工 作特性相同，原则上可通过多次打击实现小设 备干大活。实际上有效打击次数为2～3 次。 (2) 螺旋副传动，飞轮动能转变为坯料塑性变 形功的过程中，在滑块和工作台之间产生巨大 的压力。由于框式机架在受力后形成封闭力系， 所以又具有压力机的工作特性，对地基没有特 殊要求。
水平分模平锻机操作优点
水平分模平锻机的结构特征，反映在操作 工艺过程上有如下优点。 (1) 由于夹紧力大，可利用夹紧滑块作为模 锻变形机构，扩大了它的工艺过程应用 范围，可提高锻件精度。 (2) 模锻时，坯料沿水平方向传送，易于实 现机械化和自动化操作。
水平分模平锻机缺点
和垂直分模平锻机相比。 (1) 曲柄连杆式的夹紧机构，凹模夹紧状态的保持 时间有限，一般不宜进行深冲孔和管坯端部镦锻 成形。 (2) 连续锻造时(如环形锻件)，需要辅助装置把锻好 的锻件从模具表面卸除，而垂直分模平锻机可依 靠锻件自重由两半凹模间落下。 (3) 不易从凹模中清除氧化皮和冷却水；安装和调 整模具也不如在垂直分模平锻机上方便。
锤上模锻分类
• 按照模锻时有无飞边，可分为： 开式模锻、闭式模锻； • 按照模块上布置的模膛个数不同，分为 单模膛模锻、多模膛模锻； • 按照模块上终锻模膛上模锻件数分为 单件模锻(一模一件) 、 多件模锻(一模多件)
• 开式模锻：由于飞边的存在，对毛坯体 积精度要求不高，模膛的充填性能较好， 因此得到广泛应用。 • 无飞边模锻：节省飞边损耗，提高材料 利用率。但是无飞边模锻对锻件坯料的 体积精度要求精确，一般需要锯切下料 或车床下料。

VB第7章过程


6
第七章 过程
6.1 引言
1. 引例 2. 过程的定 义与使用
2)过程的定义与使用
定义过程
首先用户必须自定义一个子过程，这个子过 程通常可以完成一个特定的功能，该子过程以一 个名字来标识，可以被其他过程调用，其名字后 面的变量表称为形式参数。
用户自定义子过程与事件过程的区别是： 事件过程的名字是有一定规律的，且不能 改变，即控件名_事件名，而用户自定义 的过程名则由用户自己定义。事件过程的 参数是由系统根据事件给出，面用户自定 义的过程则是根据用户的需要。
辽宁科技大学 < Visual Basic 程序设计>教学课件③ 2007-2
10
第七章 过程
6.2 Sub过程
2)Sub过程的调用
1. Sub过程 的定义 2. Sub过程 的调用
格式：
Call 过程名 (实参列表) 或 过程名 实参列表
说明： ① 实参的个数、类型、顺序应与相应的形参保 持一致，子过程中如果没有形参，则调用中 也无实参。 ② 第2种调用方式与第1种相比，结果一样，只 是去掉Call和一对括号( )。
辽宁科技大学 < Visual Basic 程序设计>教学课件③ 2007-2
9
第七章 过程
6.2 Sub过程
1)Sub过程的定义
1. Sub过程 的定义 2. Sub过程 的调用
Sub过程说明 (1) 在VB中，Sub过程又称为子过程。 (2)子过程名、参数列表、语句块等与函数过程 的要求基本相同。 (3)子过程定义格式中“Sub过程名”和“End Sub”是必不可少的，子过程由“Sub”开始定义， 由End Sub结束，在这两者之间的程序便是能完 成某个功能的程序主体。 (4)在子过程中如果没有形参，调用时括号（） 必须省略。
  1. 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。

运行主程序文件L7-27B.prg，结果如图7－29所示。
图7－29 主程序文件L7-27B.prg 的运行结果
运行主程序文件L7-27C.prg，结果如图7－30所示。
图7－30 主程序文件L7-27C.prg 的运行结果
§7.8.2 变量的作用域
变量作用域是指变量作用的有效范围。
1．变量作用域的含义
§7.7.3 过程的调用
1．调用外部过程 外部过程以独立的程序文件存储在外存储器中，调用外部过 程就是平常所说的调用子程序文件，需要读盘。 命令格式：DO <程序名> 功能：调用过程。
说明：若缺省扩展名,则默认.prg；DO命令还可以运行其他文 件,如查询文件（.qpr）,菜单文件（.mpr）应用程序（.app） 。
【例7－27】参数传递实例。设已建立了3个程序文件，其内容 如下：
* 外部过程L7-27A.prg PARA G &&形参的名称不一定与实参相同 ?G G="Good afternoon." RETURN * 主程序文件L7-27B.prg CLEAR GG="Good Morning." DO L7-27A WITH GG && GG实参变量，按地址传递 ? GG RETURN * 主程序文件L7-27C.prg CLEAR GG="Good Morning." DO L7-27A WITH (GG) &&变量GG经括号优先算符运算后成为了表达式,按值传递 ? GG RETURN
【例7－24】编写一个菜单程序，有两个菜单项：“1.逐条显示 职工的记录”和“2.统计男女职工的人数”，通过调用程序文 件实现以上两个菜单项的功能。
程序内容如下：
* 主程序 CLEAR ?" ?" ?" ?" 主菜单" =================" 1.逐条显示职工的记录" 2.统计男女职工的人数"
内部过程是包含在程序中，或者集中存放在一个过程文件中。当打开 程序文件和过程文件时，过程就读入了内存。调用内部过程不必读盘， 所以调用内部过程的速度相对较快。
§7.7.2 过程的定义
1．定义外部过程 命令格式：[ PARAMETERS <形参表> ] <过程体语句序列> [ RETURN [ TO MASTER ] ] 功能:将一个程序文件定义为一个过程,程序文件名就是过程名。 说明： 1）若选用PARAMETERS <形参表>，则为有参过程；否则为 无参过程。 2）程序的结束不一定需要返回语句RETURN，但过程调用的结 束一定要有返回语句RETURN，否则过程调用后无法返回调点。
（1）内存变量按作用域分类：全局变量、私有变量和局部变量。 （2）全局变量、局部变量和私有变量的作用域示意如图7－33所示。
图7－33 全局变量、局部变量和私有变量的作用域示意图
2．作用域变量的定义
（1）全局变量 格式：PUBLIC <内存变量名表> 功能：定义全局内存变量（含数组）并赋予初值.F.。 说明： 1）全局变量要先定义后使用。 2）在命令窗口中创建的内存变量（含数组）为全局变量。 3）全局变量一旦建立就一直有效，即使程序运行结束也不会消失。只有执行 CLEAR MEMORY，RELEASE，QUIT等命令后全局变量才被释放。 （2）私有变量 在程序或过程中不经PUBLIC和LOCAL说明而直接创建的变量为私有变量。 私有变量也可以用PRIVATE语句定义。 格式1：PRIVATE <内存变量名表> 格式2：PRIVATE ALL [LIKE <通配名>|EXCEPT <变量通配名>] 功能：在本模块中定义私有变量，屏蔽上层的同名变量。 说明：目的是使得本模块中私有变量值的修改不会影响上层同名变量的值。
（3）局部变量 局部变量说明语句：LOCAL <内存变量名表> 说明： 1）局部变量要先定义后使用。 2）局部变量的作用域仅限于建立它的本模块。 3）由于还有一个条件查找命令LOCATE，命令动词LOCAL不 能缩写为前4个字符。 4）在本模块中屏蔽上层的同名变量。 【例7－29】屏蔽内存变量的实例。 程序内容如下：
第七章 程序设计基础
本 章 内 容
§7.1 程序文件的建立与运行 §7.7 过程
§7.2 §7.3 §7.5 §7.6 结构化程序设计初步 程序设计基本语句 选择结构 循环结构 §7.8 §7.9 参数传递与变量作用域 自定义函数
§7.4 顺序结构
§7.7 过程
将需要重复调用的语句序列定义为过程。需要执行时只要调用它即 可。
3）选用RETURN与RETURN TO MASTER 的区别见图7－28所 示。
图7－28 RETURN与RETURN TO MASTER的区别
2．定义内部过程 命令格式： PROCEDURE <过程名> [PARAMETERS <形参表>] <过程体语句序列> RETURN [TO MASTER] ENDPROC 功能：将一个语句系列定义为以<过程名>为名称的过程。 说明：由于一个过程文件中可能包含多个过程，所以要用过程 起始句PROCEDURE 3．过程文件 （1）过程文件也是.prg文件，其中包含若干个过程。（注意： 过程文件≠过程） （2）过程文件的建立与修改的方法和程序文件相同。 （3）若要使用过程文件中的过程，则要先打开过程文件。
* 内部过程P1(逐条显示职工的记录)
PROCEDURE P1
USE Zgjk DO WHILE !EOF()
DISPLAY
WAIT "按任意键显示下一条记录…" SKIP ENDDO RETURN ENDPROC
* 内部过程P2(统计男女职工的人数) PROCEDURE P2 USE Zgjk M=0 W=0 SCAN IF 性别="男" M=M+1 ELSE W=W+1 ENDIF ENDSCAN CLEAR ? "男职工人数为：",M ? "女职工人数为：",W RETURN ENDPROC
§7.8.1 参数传递
1．参数传递语句
命令格式：DO <过程名> WITH <实参表> 功能：调用过程，并将实参传递给过程中的形参。 说明：参数传递语句可以写在调用程序中的任意位置。
2．参数接收语句
命令格式：PARAMETER <形参表> 功能：在子程序或过程中定义私有的形参变量。 说明： （1）参数接收语句必须是被调用过程的第一条可执行语句。 （2）形参的数目不能少于实参的数目，否则将出错。如果形参的数目 多于实参的数目，那么多余的形参初值取.F.。 （3）实参与形参的排列顺序及数据类型要一致。 （4）如果实参是常量或表达式，则将实参的值赋给形参，称作按值传 递。这过程仅将实参的值传递给形参，形参值的改变不会影响实参。 （5）如果实参是变量，则将实参的地址传给形参，这样实参和形参实 际上是同一个变量，对形参值的修改将带回实参，称作按地址传递。
?" ?" 计算面积" ================="
?"
?" ?" ?" ?"
0.退出"
1.计算三角形的面积" 2.计算矩形的面积" 3.计算圆的面积" =================" 请输入选择序号：" TO NUM
INPUT "
DO CASE
CASE NUM=0
EXIT CASE NUM=1 DO Triangle CASE NUM=2 DO Rectangle &&调用过程文件中的过程，计算矩形的面积 CASE NUM=3 DO Circle ENDCASE WAIT "按任意键继续选择菜单……" ENDDO CLOSE PROCEDURE &&关闭过程文件 &&调用过程文件中的过程，计算圆的面积 &&调用过程文件中的过程，计算三角形的面积
* 主程序 CLEAR X=222 &&定义私有变量，作用域包括本模块及下属模块 Y=999 &&定义私有变量，作用域包括本模块及下属模块 DO P29 &&调用过程 ? "在主程序中：" ? "X=",X &&变量X的值没有被下层模块（过程29）修改，仍为222 ? "Y=",Y &&变量Y的值被下层模块（过程29）修改，输出Y=BBB RETURN &&隔断主程序与过程 * 过程 PROCEDURE P29 &&过程说明语句 PRIVATE X &&屏蔽上层模块的私有变量X，使之在当前模块无效 X="AAA" Y="BBB" ? "在子程序中：" ? "X=",X &&输出本模块中X的值，X=AAA ? "Y=",Y &&输出本模块中Y的值，Y=BBB RETURN &&子程序返回语句 ENDPROC &&过程结束语句
4．外部过程和内部过程的比较
程序.PRG（外部过程） 程序.PRG中的过程（内部过程）
过程文件.PRG中的过程（内部过程）
【例7－23】建立一个 求三角形、矩形和圆 的面积的过程文件。
程序内容如下：
* 过程Triangle（求三角形面积） PROC Triangle INPUT "请输入三角形的高度：" TO SH INPUT "请输入三角形的底长：" TO SD S=SD*SH/2 ? "三角形的面积为：",S RETURN ENDPROC