pascal過程調運

2023-01-23 09:35:37 字數 1561 閱讀 9450

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...