Procedure

Procedure

procedure  adalah suatu program yang terpisah  dalam  block tersendiri   yang berfungsi sebagai subprogram  (program  bagian).  Penggunaan  prosedur  diawali dengan kata cadangan  procedure   di dalam  bagian  deklarasi procedure. Pemanggilan  procedure  dengan menggunakan judul procedure. Pada program terstruktur banyak menggunakan procedure karena :

         - Sebagai  penerapan  program yang modular yaitu  memecah  program

           yang rumit menjadi program- program bagian yang lebih  sederhana

           dalam bentuk procedure.

         - Untuk  beberapa perintah yang sering digunakan  berulang,  cukup

           dituliskan  sekali dalam procedure dan dapat dipanggil  sewaktu-

           waktu.

          contoh Procedure tanpa parameter,

          procedure garis;

          begin

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

          end;

         procedure Judul;

          begin

           writeln('pascal');

          end;

         {modul utama}

          begin

            garis;

            judul;

            garis;

          end.

Parameter dalam procedure

Nilai  di  dalam suatu procedure sifatnya adalah  local,   berarti hanya  dapat  digunakan oleh procedure tersebut  saja  dan   tidak dapat digunakan oleh procedure yang lain.

        

   procedure hitung;

          var

           a,b,c : integer;

           begin

            write('Nilai a =');readln(a);

            write('Nilai b =');readln(b);

            c:=a+b;

            writeln('hasilpenjumlahan=',c:5);

             readln;

          end;

hitung;

writeln('nilai a=',a); -> a tdk dikenal

 end.