Materi X TKJ : Prosedur

Pengertian Prosedur

Prosedur adalah suatu program terpisah dalam blok sendiri yang berfungsi sebagai subprogram (program bagian). Prosedur di awali dengan kata cadangan Procedure di dalam bagian deklarasi prosedur. Prosedur dipanggil dan digunakan di dalam blok program yang lainnya dengan menyebutkan judul prosedurnya.

Prosedur banyak digunakan pada program yang terstruktur, karena:

1. Merupakan penerapan konsep program modular, yaitu memecah-mecah program yang rumit menjadi program-program bagian yang lebih sederhana dalam bentuk prosedur-prosedur.
2. Untuk hal-hal yang sering dilakukan berulang-ulang, cukup dituliskan sekali saja dalam prosedur dan dapat dipanggil atau dipergunakan sewaktu-waktu bila diperlukan.

Bentuk umum pendefinisiannya adalah sebagai berikut:

Prosedur tanpa parameter:

Procedure nama_prosedur;

Begin

     Statement;

End;

Contoh :

program contohprosedur1;

uses crt;

procedure garis;

begin

     writeln('---------------');

end;

begin

     garis;

     writeln('    Pascal     ');

     garis;

end.

Bila program dijalankan maka didapatkan output : 
---------------
    Pascal     
---------------

Parameter dalam Prosedur

Nilai di dalam suatu modul program Pascal sifatnya adalah lokal, artinya hanya dapat digunakan pada modul atau unit program yang bersangkutan saja, tidak dapat diguanakan pada modul atau unit program yang lainnya.

Contoh:

program contohprosedur2;

uses crt;

procedure tanyahitung;

var

   x,y : real;

begin

     write('Nilai x ? ');

     readln(x);

     y := x * x;

     writeln('Nilai y = ',y:6:2);

end;

begin

     tanyahitung;

end.

Bila program dijalankan maka didapatkan output : 
Nilai x ? 7
Nilai y = 49.00

Latihan

Buatlah program menghitung keliling persegi panjang dengan menerapkan program prosedur!