Procedure(program pascal)

PROCEDURE

•Procedure adalah suatu program terpisah

dalam blok sendiri yang berfungsi sebagai subprogram

(modul program) yang merupakan

sebuah program kecil untuk memproses

sebagian dari pekerjaan program utama.

•Prosedur diawali dengan kata cadangan

Procedure di dalam bagian deklarasi prosedur.

Prosedur dipanggil dan digunakan di dalam blok

program yang lainnya dengan menyebutkan

judul prosedurnya.

Bentuk Umum header suatu procedure adalah :

PROCEDURE nama;

Atau

PROCEDURE nama (formal parameter :

jenis);

PROGRAM CONTOH_1;

VAR p,l,t,vol,panj : real;

PROCEDURE kotak;

VAR v,pl : real;

BEGIN

v := p * l * t ;

pl := p + 2.0 * t;

writeln(v,pl);

END;

BEGIN

writeln(‘panjang’ : 10,’lebar’ : 10,’tinggi’ : 10);

readln(p,l,t);

kotak;

END.

procedure garis;

begin

writeln('-------------');

end;

procedure Judul;

begin

writeln('pascal');

end;

{modul utama}

begin

garis;

judul;

garis;

end.