广东省汕头市金山中学高中信息技术 奥林匹克信息学竞赛班进阶篇 pascal04 子程序课件.ppt

pascal 子程序 过程 子程序 过程 单独写成一个程序段 可以多次调用 可以通过参数处理不同的数据 procedureabc x integer begin end 过程名 参数表 子程序的内容 过程 子程序 programex701 varu v integer procedurep1 x y integer vari j integer beginfori 1toxdobeginj y i write j end end beginu 6 v 5 p1 u v writeln u u v v u v p1 u v writeln end end 过程在程序中的位置及调用 过程 子程序 无参过程 programdraws procedureline constlength 10 vari integer beginfori 1tolengthdowrite writeln end beginline writeln hello line end 输出 hello 过程 子程序 有参过程 programdraws procedureline length integer vari integer beginfori 1tolengthdowrite writeln end beginline 10 writeln hello line 8 line 5 end 输出 hello 过程 子程序 参数 值参 变参 procedureline x integer 值参 procedureline vary integer 变参 过程 子程序 值参和变参的区别 programzc varn integer procedurea x integer vari integer beginfori 1toxdowrite writeln x x 10 end beginread n a n writeln n n end 输入 5 输出 n 5 5 5 x 15 5 复制 值参 15 过程 子程序 值参和变参的区别 programzc varn integer procedureb varx integer vari integer beginfori 1toxdowrite writeln x x 10 end beginread n b n writeln n n end 输入 5 输出 n 15 5 5 x 15 变参 没有开新的空间 5 15 过程 子程序 vara b integer x y integer procedurefun a b integer vark integer begink a a b b k end begina 3 b 6 x a y b fun x y writeln no 1 a b fun a b writeln no 2 a b end 例 2007年联赛第4题 指向内存地址 该地址的内容 输出 no 1 36no 2 36 忘了 值参 过程 子程序 全局变量和局部变量 在主程序说明的为全局变量 在子程序说明的为局部变量 当全局变量和局部变量同名时 子程序中的变量不影响全局变量 仅在该子程序中有效 过程 子程序 programsame varx integer procedurelet varx integer beginx 1 writeln x end beginx 0 let writeln x end 全局变量和局部变量同名 运行结果 输出 10 局部变量 全局变量 计算机内存 函数 函数 和过程类似 都是独立的程序段 不同之处在于它会返回一个值 functionabc x integer boolean begin abc end 函数名 参数表 给函数赋值 函数类型 函数 programarea 求五边形面积 varl1 l2 l3 l4 l5 l6 l7 s real functionts a b c real real 计算三角形面积ts varp real beginp a b c 2 ts sqrt p p a p b p c 海伦公式 end beginread l1 l2