Mengenal Procedure di Pascal: Cara Membuat Kode Lebih Rapi dan Efisien

Pernahkah Anda merasa kode program yang Anda buat terlalu panjang dan sulit untuk dibaca? Dalam dunia pemrograman, ada sebuah konsep untuk memecah program besar menjadi bagian-bagian kecil yang lebih mudah dikelola. Di bahasa Pascal, bagian kecil ini disebut sebagai Procedure (Prosedur).

Apa Itu Procedure?

Procedure adalah suatu program terpisah dalam blok sendiri yang berfungsi sebagai sub-program atau modul program. Prosedur merupakan sebuah program kecil yang dirancang untuk memproses sebagian dari pekerjaan program utama.

Berikut adalah beberapa karakteristik utama Procedure:

• Bagian Deklarasi: Penulisan prosedur diawali dengan kata cadangan Procedure di dalam bagian deklarasi program.
• Cara Memanggil: Prosedur dipanggil dan digunakan di dalam blok program lain cukup dengan menyebutkan judul atau nama prosedurnya saja.

Struktur dan Bentuk Umum

Struktur sebuah prosedur terdiri dari bagian judul (header) yang berisi nama prosedur dan deklarasi parameter jika diperlukan. Parameter sendiri adalah nama-nama peubah (variabel) yang dideklarasikan pada bagian header tersebut.

Bentuk umum penulisan header prosedur adalah sebagai berikut:

• Tanpa Parameter: PROCEDURE nama;
• Dengan Parameter: PROCEDURE nama (formal parameter: jenis);

Variabel Lokal dalam Procedure

Satu hal penting yang perlu dipahami adalah sifat nilai di dalam suatu modul prosedur bersifat lokal. Artinya, variabel yang dideklarasikan di dalam prosedur hanya dapat digunakan pada modul tersebut saja dan tidak dapat digunakan pada modul atau unit program lainnya¹¹.

Sebagai contoh, jika Anda memiliki variabel X dan Y di dalam sebuah prosedur, maka variabel tersebut hanya "dikenal" oleh prosedur itu sendiri¹².

Contoh Implementasi: Menentukan Bilangan Terbesar

Mari kita lihat bagaimana prosedur digunakan untuk menentukan bilangan bulat terbesar di antara tiga angka¹³.

PROGRAM contoh_1;
VAR a,b,c: integer;

PROCEDURE maksimum;
VAR maks: integer; // Variabel lokal
BEGIN
  IF a > b THEN maks := a ELSE maks := b;
  IF c > maks THEN maks := c;
  WRITELN('Bilangan terbesar adalah: ', maks);
END;

BEGIN
  WRITELN('Masukkan tiga angka:');
  READLN(a,b,c);
  maksimum; // Memanggil prosedur dengan menyebut namanya
END.

Pada contoh di atas, program utama membaca input a, b, dan c, lalu memanggil prosedur maksimum untuk memproses dan menampilkan hasilnya¹⁴.

Kesimpulan

Menggunakan Procedure adalah langkah cerdas untuk membuat kode program Anda lebih terorganisir. Dengan membagi pekerjaan menjadi sub-program yang lebih kecil, Anda dapat menghindari pengulangan kode dan mempermudah proses pencarian kesalahan (debugging).

Tantangan: Cobalah buat prosedur untuk menghitung luas segitiga berdasarkan rumus Luas = (Alas * Tinggi) \ 2. Pastikan semua proses input dan perhitungan dilakukan di dalam prosedur tersebut!