Procedure 1

Prosedur adalah suatu program yang berdiri sendiri. Dalam suatu program Pascal, letak prosedur ini setelah bagian deklarasi dan sebelum bagian program induk. Untuk mendefinisikan suatu prosedur, anda harus memberikan kata 'Procedure' sebagai pengenal suatu prosedur.

Untuk memperjelas pembahasan, berikut ini adalah contoh penulisan program dengan menggunakan prosedur.

Program Prosc1;
Uses Crt;
Var
  I : Integer;

Procedure Cetak;
Begin
  Writeln('ini berasal dari prosedur cetak');
End;

Begin
  For I := 1 to 5 do
  Cetak;
End.

Bila program tersebut di atas dijalankan, akan muncul tampilan seperti ini

ini berasal dari prosedur cetak
ini berasal dari prosedur cetak
ini berasal dari prosedur cetak
ini berasal dari prosedur cetak
ini berasal dari prosedur cetak

Setiap kalimat tersebut adalah kalimat yang dihasilkan oleh perintah cetak yang merupakan pengganti dari perintah Writeln.

Bila kamu melihat program tadi, kata procedure merupakan kata yang menyatakan bahwa baris tersebut merupakan permulaan dari suatu prosedur. Kata procedure akan diikuti oleh nama prosedur, dan bila nama ini dipanggil, program yang terdapat diantara 'Begin' dan 'End;' setelah kata procedure yang akan dijalankan. Jadi baris-baris program yang dinyatakan dalam suatu prosedur merupakan baris-baris diantara 'Begin' dan 'End;' yang terdapat setelah 'Procedure'.