Procedure dan Function (fungsi) adalah suatu rutin yang biasanya dipakai
sebagai alat untuk melakukan tugas tertentu dan/atau mendapatkan nilai tertentu
Pada dasarnya procedure dan function itu adalah sama,
bedanya adalah procedure tidak mempunyai nilai kembalian (return value).
sedangkan function mempunyai nilai kembalian (return value)
Pada penulisannya procedure akan ditulis sebagai satu pernyataan yang berdiri sendiri,
sedangkan function biasanya ditulis di sebelah kanan pernyataan lain atau ditulis
sebagai suatu nilai yang dimasukkan kedalam variabel .
pertama kita buka dulu Borland Delphi 7 dulu,,
kalau nggak tau caranya klik disini
berikut ini penulisan perintah Procedure by value dan hasilnya:
jagan lupa klik 'play' atau tekan F9 pada keyboard,,
masukkan angkanya,, seperti ini,,
hasilnya akan muncul seperti gambar dibawah ini,,
penulisan procedure terletak diantara var dan var,,
Perintah Inti,,
uses
SysUtils;
var
x,y:integer;
Procedure bagi (A,B:integer);
var
c:integer;
begin
c:=a/b;
writeln('Hasil pembagian',c:4:2);
end;
begin
write('Masukkan Nilai X = ');readln(x);
write('Masukkan Nilai Y = ');readln(y);
bagi(x,y);
readln;
end.
keterangan perintah-perintah delphi 7 klik disini
