1樓:閔林
給你一個pascal教程的**自己看
函式和過程
8.1 函式
如果一個子程式執行後能夠返回其結果制,那麼它就可以用於表示式中,稱這種子程式為函式,這種語句序列的定義稱為函式說明。函式說明形式如下:
function 函式名(形式參數列):函式型別;
說明部分;
begin
語句1;
語句2;
……語句n
end函式返回一個函式值,過程則能完成一系列各種操作。函式的呼叫方式出現在表示式中,而過程呼叫是一句獨立的語句。
例:計算|x|的函式
function zhoufei(x:real):real;
var z:integer;
begin
if x>=0 then z:=x
else z:=-x
zhoufei:=z;
end;
函式說明第一行為函式首部。它指明函式名、函式形參資訊和函式值的資料型別。如上面求x絕對值的函式說明,函式名是zhoufei;它有一個值引數x為實型;函式值的資料型別為實型。
turbo pascal規定一個函式只能求出一個簡單值,所以函式值型別只能是任何非結構型別。
除函式首部和過程首部的句法略有差別外,函式體和過程體完全相同。函式體中至少要有一條語句對函式名賦值。如函式zhoufei 中有語句「power:
=z」。函式的每次求值至少要執行這樣的一條語句,為次計算求得一個值。返回時就把這個值帶呼叫的地方。
8.2 過程
給某個語句序列組成的子程式賦於一個適當的名字。程式中凡是需要出現這個語句序列的地方,可以簡單的寫上子程式的名字。這種完成一個操作的子程式稱為過程;子程式的定義稱為過程說明。
過程說明由過程首部和過程體組成,其形式如下:
procedure 過程名(形式參數列);-------過程首部
說明部分;
begin
執行語句;
……end;
例 輸出兩個數中最大值的過程
procedure largest(a,b:integer);
begin
if a>b then writeln(a)
else writeln(b);
end.
上面largest過程由兩個型別為整型的形式引數:a,b,你向過程傳入的兩個需要比較大小的數。
2樓:夜貓香檳
在pascal中,過程調運比較自由,既可以在主程式裡呼叫,也可以互相呼叫,巢狀。
如果在主程式裡呼叫,則:
《過程名》(引數);
互相呼叫:則:(例)
procedure f2;
forword;
procedure f1;
begin
……f2;
……end;
procedure f2;
begin
……f1;
……end;
其中,forword是保留字,必不可少。
Pascal問題 矩陣乘法,Pascal 矩陣乘法的完整過程?
vara,b,c,i,j,k longint x,y,f array 0.2000,0.2000 of longint begin read a read b read c for i 1 to a do for j 1 to b do read x i,j for i 1 to b do for ...
pascal問題望解答,3個pascal問題,望解答!
第一題就是while3重,判斷。然後判斷它是不是素數 pascal程式設計問題,求大師解答!這個問題一點也不簡單!這涉及演算法 簡單的思路,就是對這n個數,做列舉,從1個,2個,3個,每個裡面又有不同的組合,這就是所謂的 冪集 如果n很大的時候,這個方法效率太低不可行 前面那位同學提及的揹包演算法就...
pascal字串處理,Pascal字串處理
用集合 vars,t string a,b,c,e,f,g,h set of char i byte begin readln s readln t a b c a z 0 9 for i 1 to length s do a a upcase s i a a c for i 1 to length...