PROCEDURE - ПРОЦЕДУРИ   
 

Процедурите - PROCEDURE се дефинираат на следниот начин:

procedure IME (lista_na_parametri1:tip_na_parametri1;Var lista_na_parametri2:tip_na_parametri2);

lista_na_parametri1 - влезни параметри одвоени со запирка чии вредности се добиваaт од местото на повикувањето.
lista_na_parametri2 - излезни параметри одвоени со запирка чии вредности се пресметуваат во процедурата и се враќаат во местото на повикот на процедурата.

Пример за процедура:
 

procedure Ime (a, b : integer; var c, d : real);
begin
  a := 10;
  b := 2;
  Ime (a, b, c, d);
end;
 

Комплетен пример со процедура:

program primer1;

procedure soberi( prv, vtor : integer; var rezultat:integer);
    var   rezultat : integer;
    begin
        rezultat := prv + vtor;
        writeln('Rezultatot e  ', rezultat )
    end;

    var   broj1, broj2,rezultat : integer;
    begin
          writeln('Vnesete dva broja');
          readln( broj1, broj2 );
          soberi( broj1, broj2,rezultat);


    end.

program primer2;

procedure soberi( prv, vtor : integer; var   rezultat : integer);
    begin
        rezultat := prv + vtor;
     end;

    var   broj1, broj2,rezultat : integer;
    begin
          writeln('Vnesete dva broja');
          readln( broj1, broj2 );
          soberi( broj1, broj2,rezultat);
          writeln('Rezultatot e  ', rezultat )
 

   end.