ϳ - , || |-| , || || || . '.
|| . || .
Turbo| Pascal| - . - . Pascal| - || . .
- || , || . || , || .
, ||. || ||, ' . |',| , ' . .
|,| . - , || , . :
Procedure| <Name|>(< >);
... { }
Begin|
{ }
End|;
Procedure| - ; Name| - , ' .
Procedure| MyProc| (A,B,C|: Real|; var| X1,X2|: Real|);
Begin|
WriteLn|('A=',A| ' B=|', B, 'C=|', C);
X1:=A+B|;
X2:=A*B-C|
End|;
||.
|,| :
Name|(< >);
MyProc|(K, L+M|, 12, Y1|, Y2|);
, . ϳ|| || , . ϳ|| || , |,| , || .
. ³ |',| , || . || ' () (|-| ). , .
|
|
|
Function| <Name|>(< >):<Type>;
... { }
Begin|
{ }
Name:=<| ||>;
.
End|;
Function| - ; Name| - , ' . || ' | | || || ||. ϳ|| .
, , | , , | . ' (|| ) - ||, . ' .
' || () . |, . , .
, . , , , . ', | |',| .
, || , - . , || , || || . , . , 䳿 || 䳿 , ' .
