Prosedur Memanggil Dirinya Sendiri (Rekursi)

Prosedur memanggil dirinya sendiri merupakan suatu prosedur yang memanggil atau
menggunakan prosedur itu juga. Proses dari suatu program bagian yang memanggil
dirinya sendiri dikenal dengan istilah rekusi.

Contoh

Var
   I:integer;
   Procedure Cetak;
Begin
   Writeln(‘Pascal’);
   I:=i+1;
   If i<10 then cetak;
End;
  Begin
   I:=1;
  Cetak;
End.

Bila program dijalankan, maka prosedur cetak akan diproses sebanyak 9 kali, yaitu
dengan cara memanggil dirinya sendiri, hasilnya sebagai berikut.
Pascal
Pascal
Pascal
Pascal
Pascal
Pascal
Pascal
Pascal
Pascal