Процедура - это подпрограмма, предназначенная для решения подзадачи, необязательно связанной с вычислением значений. Процедуры можно использовать для ввода или вывода данных структурированных типов, вычисления нескольких значений, преобразования данных и т.п.
Заголовок процедуры:
Идентификатор после ключевого слова procedure- имя процедуры.
Пример 1. Описание процедуры для решения квадратного уравнения 
:
Рrocedure sqr_equation(a,b,c : real; var x1,x2 : real; var flag:boolean);
{a, b, c - исходные данные (коэффициенты квадратного уравнения), параметры-значения; flag - параметр для записи: true - есть корни, false - нет корней; x1 и x2 - параметры-переменные для записи корней}
var d :real; { дискриминант}
begin
d := b*b-4*a*c;
flag := d>=0
if d>0 then
begin
d := sqrt(d);
x1 := (-b+d)/(2*a); x2 := (-b-d)/(2*a)
end
else if abs(d)<1E-10 then
begin
x1:= -b/(2*a); x2 := x1
end
end; {Конец описания процедуры.}
