Procedure назва ( список параметрів );

Процедура назва ( список параметрів );

У заголовку процедури вказують ім'я процедури та описують список формальних параметрів (якщо він потрібен).
Запуск процедури здійснюють за допомогою оператора звертання до процедури.

Procedure Change( var a, b : integer );
var
i : integer;
begin
i := a; a := b; b := i
end;

У заголовку функції визначають ідентифікатор функції, формальні параметри (якщо вони є) і тип результату функції.

Function назва( список параметрів ): тип;

Функція назва( список параметрів ): тип;

Функція активізується під час її виклику. Викликаючи функцію, вказують ідентифікатор функції і параметри, необхідні для обчислення її значення. Виклик функції можна включати у вираз як операнд. Коли обчислюється вираз, функція виконується і значенням операнда стає значення, яке повертається функцією.
В операторній частині блоку функції потрібно записати принаймні один оператор присвоювання, у якому ідентифікатору функції присвоюється значення. Результатом функції є останнє присвоєне значення. Якщо такий оператор присвоювання відсутній або він не був виконаний, то значення, яке повертається функцією, невизначене.
Якщо ідентифікатор функції використовується під час виклику функції всередині виконуваного блоку функції, то функція виконується рекурсивно.

Function Max (a:Vector; n:integer): integer;
var
i, x : integer;
begin
x := a(1);
for i := 2 to n do
if x < a[i] then x := a[i];
Max := x;
end;