子程序

過程

函數(shù)val(s,k,code)Delete(s,w,k)length(s)copy（s,w,k)子程序通過子程序?qū)崿F(xiàn)程序的模塊化。

programmain；子程序1說明；子程序2說明；

Begin

子程序1；子程序2；

End.過程給某語句序列組成的子程序賦予一個適當(dāng)?shù)拿帧３绦蛑蟹彩切枰霈F(xiàn)這個語句序列的地方，可簡單的寫上子程序名。這種完成一個操作的子程序稱為過程；語句序列的定義稱為過程說明。過程1、過程說明procedure

過程名(形式參數(shù)表);

說明部分;

begin

語句序列；end;

可選[var]變量名：類型說明的變量只在本過程內(nèi)有效過程2、過程調(diào)用過程名(實在參數(shù)表);（1）實參的個數(shù)、類型必須與形參一一對應(yīng)。（2）過程調(diào)用的步驟為：計算實參的值，將值或變量的“地址”傳遞給對應(yīng)的形參，執(zhí)行過程體，返回調(diào)用處。過程3、應(yīng)用舉例輸出兩個整數(shù)中較大的值過程3、應(yīng)用舉例Programex；Varx，y：integer；procedurelarger(a,b:integer);begin

ifa>bthenwriteln(a)

elsewriteln(b)

end；

Beginread（x，y）；

larger（x，y）End.函數(shù)如果一個子程序執(zhí)行后能返回其結(jié)果值，那么它就可以用于表達式中，稱這種子程序為函數(shù)，這種語句序列的定義稱為函數(shù)說明。函數(shù)1、函數(shù)說明function

函數(shù)名(形式參數(shù)表)：函數(shù)類型;

說明部分;

begin

語句序列；end;

可選[var]變量名：類型說明的變量只在本過程內(nèi)有效返回函數(shù)值的類型至少應(yīng)該給函數(shù)名賦一次值，以便把函數(shù)值帶回調(diào)用程序函數(shù)2、函數(shù)調(diào)用函數(shù)名(實在參數(shù)表);（1）實參的個數(shù)、類型必須與形參一一對應(yīng)。（2）函數(shù)調(diào)用的步驟為：計算實參的值，將值或變量的“地址”傳遞給對應(yīng)的形參，執(zhí)行函數(shù)體，返回調(diào)用處。函數(shù)的調(diào)用只能出現(xiàn)在允許表達式出現(xiàn)的地方，或作為表達式的一個因子。函數(shù)3、應(yīng)用舉例輸出兩個整數(shù)中較大的值函數(shù)3、應(yīng)用舉例Programex；Var

x,y,z：integer；functionlarger(a,b:integer)：integer;

begin

ifa>bthenlarger:=a

elselarger:=b;

end；

Beginread（x，y）；

z:=larger（x，y）；

writeln(z)End。形參和實參

子程序調(diào)用(過程調(diào)用或函數(shù)調(diào)用)的執(zhí)行順序：實參和形參結(jié)合執(zhí)行子程序返回調(diào)用處繼續(xù)執(zhí)行實參與形參間進行數(shù)據(jù)交換

實參與形參的個數(shù)、順序、類型必須一一對應(yīng)。數(shù)值形參（值參）格式：（參數(shù)名表：類型）1、實參與值參之間的數(shù)據(jù)傳遞是單向的，只能是實參值值形參。2、與值參對應(yīng)的實參必須有確定的值。3、當(dāng)調(diào)用返回主程序后，值參的存儲單元釋放。數(shù)值形參（值參）Programjiaohuan;Var

a,b:integer;ProcedureSwap(x,y:integer);Var

t:integer;Begin t:=x;x:=y;y:=t end;Begin a:=1;b:=2;

Writeln(a:3,b:3);

swap(a，b);

Writeln(a:3,b:3);End.輸出結(jié)果：

212兩數(shù)交換數(shù)值形參（值參）abxyt1212121變量形參格式：（var

參數(shù)名表：類型）1、對應(yīng)的實參只能是變量名，不能是值或表達式。2、對應(yīng)的實參可根據(jù)需要決定是否事先有值。4、當(dāng)調(diào)用返回主程序后，變量形參的存儲單元不釋放，但已無定義，不得再使用。3、調(diào)用子程序時，實參地址變量形參。變量形參Programjiaohuan;Var

a,b:integer;ProcedureSwap(var

x,y:integer);Var

t:integer;Begin t:=x;x:=y;y:=t end;Begin a:=1;b:=2;

Writeln(a:3,b:3);

swap(a，b);

Writeln(a:3,b:3);End.輸出結(jié)果：

221兩數(shù)交換變量形參abxyt12121全局變量、局部變量及其作用域全局變量及其作用域在程序開頭的說明部分定義和說明的變量稱為全局變量。

(1)在全局變量和局部變量不同名時，其作用域是整個程序。(2)在全局變量和局部變量同名時，全局變量的作用域不包含同名局部變量的作用域。局部變量及其作用域在子程序內(nèi)部說明的變量稱為局部變量。局部變量的作用域是其所在的子程序。形式參數(shù)也屬于局部變量。(1)當(dāng)外層過程的局部變量名和嵌套過程中的局部變量不同名時，外層過程的局部變量作用域包含嵌套過程。(2)當(dāng)外層過程的局部變量名和嵌套過程內(nèi)的局部變量名同名時，外層局部變量名的作用域不包含此過程。作業(yè)1、計算M=max(a,b,c)/(max(a+b,b,c)*max(a,b,b+c))2、給一個任意6個整數(shù)的數(shù)列，假設(shè)為123456，建立具有以下內(nèi)容的方陣。