Procedure By Reference
adalah
Nilai di dalam suatu modul program Pascal / Delphi sifatnya adalah lokal,
artinya hanya dapat digunakan pada modul atau unit program yang bersangkutan
saja, tidak dapat digunakan pada modul atau unit program yang lainnya.
pertama
kita buka dulu Borland Delphi 7 dulu,,
kalau
nggak tau caranya klik disini
berikut ini penulisan perintah Procedure by
reference dan hasilnya:
jangan
lupa klik 'play' atau tekan F9 pada keyboard,,
masukkan angka seperti berikut,,
hasilnya akan seperti berikut ini,,
itu adalah hasil percobaan
procedure by reference dengan perintah perkalian,,
Perintah
intinya,,
var
x,y,z:integer;
Procedure kali (var
A,B,C:integer);
begin
C:=A*B;
end;
begin
write('Masukkan Nilai
X = ');readln(x);
write('Masukkan Nilai
Y = ');readln(y);
kali(x,y,z);
writeln('X x Y =
',z);
readln;
end.
variabel A dab B bersifat
global untuk prosedur kedua dan utama, tetapi tidak bersifat global untuk
prosedur kesatu, sehingga prosedur kesatu tidak dapat menggunakan
variabel-variabel tersebut.
keterangan
perintah-perintah delphi 7 klik disini
***selamat
mencoba***
