Procedure Dalam Pascal
Dalam pascal kita mengenal yang namanya procedure, procedur yang dimaksud dalam pascal menurut Dwi Sanjaya dalam buku struktur data diplanet pascal, procedure berguna untuk mengumpulkan statment-statment yang dapat dijalankan menjadi satu dalam suatu block dan untuk menjalankannya kembali hanya dengan menuliskan nama procedure yang menampungnya. jadi kita ga perlu banyak buat listing hanya tinggal panggil nama procedurenya saja saat kita membutuhkannya.
Berikut contoh latihan1 program hitung_tanpa_parameter; ———-> parameter = nilai
var
p,q,x,y:byte;
procedure tambahkali;
begin
p:=x+y;
q:=x*y;
writeln(’X+Y=’,p);
writeln(’X*Y=’,q);
end;
begin
write(’X=’);readln(x);
write(’Y=’);readln(y);
tambahkali;
readln;
end.
Latihan 2 program hitung_dengan_parameter;
var
p,q,x,y:byte;
procedure tambahkali(a,b:byte);
begin
p:=a+b;
q:=a*b;
writeln(’X+Y=’,p);
writeln(’X*Y=’,q);
end;
begin
write(’X=’);readln(x);
write(’Y=’);readln(y);
tambahkali(x,y);
readln;
end.
salam kenal, informasi yang menarik.
thanx
Comment by theodolite — March 26, 2008 @ 8:52 pm
salam kenal, informasi yang menarik.
thanx
Comment by theodolite — March 26, 2008 @ 8:53 pm