Sekarang kita akan belajar tentang procedur reference tetapi sebelum itu kita harus mengenal terlebih dahulu tentang apa itu procedure???!!!!
1. Procedure
Prosedure ini digunakan untuk aktivitas yang harus
dilakukan lebih dari satu kali dan untuk menghindari penulisan teks program
yang sama secara berulang kali. Prosedur ini cukup ditulis sebanyak satu kali
namun dapat dipanggil dari bagian program utama. Pada dasarnya, struktur
prosedur sama dengan struktur program yang sudah kita kenal, hanya saja bagian
judul (header) ditulis PROSEDURE (bukan lagi PROGRAM)
contohnya:
Program
menentukan_luas_keliling_lingkaran;
uses crt;
const
phi=3.14;
var
r:real;
Procedure
Luas_lingkaran;
var
luas:real;
begin
luas:=phi*r*r;
writeln('Luasliangkaran adalah ',luas:0:2);
readln;
end;
{program
utama}
begin
clrscr;
writeln('Program menghitung luas lingkaran');
writeln(' ');
write('input jari2 lingkaran ');
read(r);
writeln;
Luas_lingkaran;
readln;
end.
2. procedure by reference
Dengan menggunakan parameter pass by reference (secara
acuan), maka proses – proses yang terjadi pada modul prosedur, akan
mempengaruhi nilai pada parameter di program utama.
3. procedure by value
pada pengiriman nilai dengan pass by
value maka nilai pada parameter di prosedur akan diisi dengan nilai pada
parameter di program utama. Proses – proses yang terjadi di prosedur tidak akan
mengubah nilai parameter di program utama.
Tidak ada komentar:
Posting Komentar