Forward sözü yazılır. Məsələn,
var n,l:integer; procedure Turqut(i: integer; var l:integer); forward; procedure Azad(i: integer; var l:integer); begin Turqut(i-1,l); end; procedure Turqut(i: integer; var l:integer); begin l:=i*5; end; begin read(n); Azad(n,l); write(l) end.
1
Başqa sözlə funksiya və ya prosedurun özündən özünə müraciət olunduqda onda həmin prosedura
və ya funksiyaya rekursiv prosedur və ya funksiya deyilir.