Materi X TKJ : Parameter Dalam Prosedur

Parameter merupakan suatu nilai atau referensi yang dikirimkan kedalam rutin tertentu dan kehadirannya akan mempengaruhi proses maupun nilai yang terdapat didalam rutin itu sendiri. Parameter ditempatkan didalam tanda kurung setelah nama rutin bersangkutan. Setiap parameter harus memiliki tipe data tersendiri.

Jenis parameter dibedakan menjadi dua yaitu parameter formal dan aktual. Parameter formal adalah parameter yang terdapat pada saat pembuatan prosedur atau fungsi, sedangkan parameter aktual adalah parameter yang terdapat pada saat pemanggilan prosedur atau fungsi. Contoh pembuatan dan pemanggilan fungsi:

Procedure Hitung(A,B:   integer );

Var

      C  :  integer ;

Begin

     C  := A + B;

      Writeln('Nilai C  = ' , C ) ;

End;    (*  procedure Hitung   *)

Pada prosedur diatas, variabel A, B disebut dengan parameter formal. Sekarang pada saat kita memanggil prosedur misal dengan kode sbb:

Var     

     X,Y     :  integer ;

 Begin                             

     …                             

     …

          

     Hitung   ( X, Y ) ; 

…                       

 End.

Variabel  X,Y yang terdapat pada pemanggilan prosedur Hitung akan disebut sebagai parameter aktual.

Pengiriman parameter secara nilai

Bila parameter dikirim secara nilai (by value) ,parameter formal di prosedur akan berisi nilaI yang akan dikirimkan yang kemudian bersifat lokal diprosedur. Bila nilai parameter formal di prosedur tersebut berubah, tidak akan mempengaruhi nilai parameter nyata  (nilai parameter nyata tetap tidak berubah). Pengiriman secara nilai ini merupakan pengiriman searah, yaitu dari parameter nyata ke parameter formal, yang tidak dikirimkan balik dari parameter formal ke parameter nyata.

Parameter-paramete yang digunakan dengan pengiriman secara nilai ini disebut dengan parameter nilai (value parameter).

Contoh :

program contoh1;

uses crt;

 Procedure Hitung (A,B     :   integer ) ;

 Var

      C  :  integer ;

 Begin

     C  := A + B;

      Writeln(#10,'Nilai C  = ' , C ) ;

 End;    (*  procedure Hitung   *)

 Var     

     X,Y     :  integer ;

 Begin                             

     Write(' Nilai   X  ?  ' ) ;                            

     ReadLn(X) ;

     Write ( ' Nilai   Y  ?  ' ) ;

     ReadLn(Y) ;

     Hitung   ( X, Y ) ;                         

 End.

Bila program dijalankan:

           Nilai   X  ?  2

           Nilai   Y  ?  3

           Nilai   C  =  5

Penjelasan:

 1. Prosedur dimulai dengan deklarasi prosedur dengan judul prosedur:

 2. Variabel lokal yang hanya dipergunakan di prosedur dan tidak termasuk sebagai parameter formal ( parameter nilai ), harys didefinisikan sendiri, sebagai berikut

                           Var

                C : integer ;

 3. Hubungan antara parameter formal di prosedur dengan parameter nyata dimodul utama adalah sebagai berikut:

      

Terlihat bahwa nilai –nilai parameter nyata X Dan Y dimodul utama dikirimkan ke  parameter formal A dan B di prosedur . dengan demikian, nilai parameter A dan B di prosedur akan berisi nilai yang sama dengan parameter X dan Y di modul utama