ç¬¬ä¸ƒç« è¿è¡Œæ—¶çš„å­˜å‚¨åˆ†é 

动 态 作 用 域 的 例 子program dynamic (input,output);var r: real;procedure show; 在 静 态 作 用 域 之 下 ,begin write (r: 5:3) end; 程 序 的 输 出 为 :procedure small;0.250 0.250var r: real;0.250 0.250begin r :=0.125; show end;begin在 动 态 作 用 域 之 下 ,r :=0.25;输 出 为 :show; small; writeln;0.250 0.125show; small; writeln0.250 0.125end.2011 年 春 季 学 期 《 编 译 技 术 》 课 程 北 京 大 学 信 息 科 学 技 术 学 院45