Prosedur dan Fungsi pada bahasa pemrograman Pascal

Pengertian prosedur dan fungsi pada bahasa perograman Pascal

1. Prosedure

Prosedur merupakan bagian yang terpisah dari program dan dapat diaktifkan dimanapun didalam progrma. Kata prosedur digunakan sebagai judul dibagian deklarasi prosedur, diikuti oleh identifier yang merupakan nama dari prosedurnya secara optional dapat diikuti lagi oleh kumpulan parameter yang diakhiri dengan titik koma.

Parameter yang ada pada Prosedure 

Pada prosedur terdapat 2 jenis paramter, yaitu :

1. Parameter Formal : merupakan nama-nama variable (list nama) yang dipakai dalam mendefinisikan prosedur dan membuat prosedur tersebut dapat dieksekusi dengan nama-nama yang berbeda ketika dipanggil. Ada 3 jenis parameter formal : 

o   Paramter Input : yaitu parameter yang diperlukan prosedur sebagai masukan untuk melakukan aksi yang efektif.

o   Parameter Output : yaitu parameter yang nilainya akan dihasilkan oleh prosedur.

o   Parameter Input / Output : yaitu parameter yang nilainya diperlukan prosedur sebagai masukan untuk melakukan aksi, dan pada akhir prosedur akan dihasilkan nilai yang baru.

2.  Paramter Aktual : adalah nama-nama informasi yang dipakai ketika prosedur itu dipakai.

Contoh Program Pascal sederhana dengan menggunakan prosedur

 

 uses wincrt; 

 procedure tambah (x,y:integer; var hasil:integer); 

 begin 

 var z:integer; 

 begin 

 tambah (2,3,z); 

 writeln('2+3=',z); 

 end. 

2. Fungsi

Fungsi merupakan bagian yang terpisah dan mirip dengan prosedur, namun ada perbedaannya. Kata Fungsi mengawali bagian deklarasi fungsi diikuti oleh identifier yang merupakan nama dari fungsinya dan secara optional dapat diikuti oleh kumpulan paramter, tipe dari fungsinya dan diakhiri dengan titik koma.

Contoh Program Pascal sederhana dengan menggunakan fungsi

 uses wincrt; 

 function tambah (x,y:integer):integer; 

 begin 

 tambah:=x+z; 

 end; 

 begin 

 writeln('2+3=',tambah(2,3)); 

 end. 

ARRAY

Bahasa pemrograman Pascal menyediakan struktur data yang disebut Array,
yang dapat menyimpan data secara sekuensial dengan ukuran yang sudah ditetapkan dan setiap elemen memiliki type data yang sama.
Sebuah array digunakan untuk menyimpan koleksi data, tetapi lebih sering dianalogikan sebagai sebuah kumpulan variabel dari jenis yang sama.
Intinya array adalah suatu struktur data variable yang dapat menampung lebih dari 1 nilai. tentunya dengan type data yang sama.
A. Mendeklarasikan Array 1 Dimensi dalam Pascal
Array 1 dimensi dapat digambarkan dalam skema berikut :

Pemdeklarasiaan Array 1 dimensi

var

    array-identifier = array[index-type] of element-type;

array-identifier nama dari array type
index-type panjangnya/banyaknya array
element-type type data dari isi yang akan di masukkan ke dalam array

Contoh Khasus1

program Khasus1;

var

   nama  : array [1..3] of string[30];

   kota  : array [1..3] of string[10];

   umur  : array [1..3] of integer;

   i : integer;

begin

   nama[1] := 'Helmi'; // mengisi array nama di index ke 1

   kota[1] := 'Tasik';

   umur[1] := 15;

   nama[2] := 'HAKIM';

   kota[2] := 'Garut';  // mengisi array kota di index ke 2

   umur[2] := 17;

   nama[3] := 'Faisal Hakim';

   kota[3] := 'Bandung';

   umur[3] := 16;  // mengisi array umur di index ke 3

   For i := 1 to 3 do // perulangan menampilkan isi array

   Begin

    writeln('nama nya adalah : ', nama[i]); // mengambil isi dari array nama index ke i

    writeln('kota nya adalah : ', kota[i]);  // mengambil isi dari array kota index ke i

    writeln('umur nya adalah : ', umur[i]);  // mengambil isi dari array umur index ke i

    writeln(' ');

   End;

end.

Hasilnya adalah :

nama nya adalah : Helmi

kota nya adalah : Tasik

umur nya adalah : 15

nama nya adalah : HAKIM

kota nya adalah : GARUT

umur nya adalah : 17

nama nya adalah : Faisal Hakim

kota nya adalah : Bandung

umur nya adalah : 16

B. Array Multi Dimensi (contoh array 2 dimensi)
Array 2 dimensi dapat di gambarkan sebagai berikut :

Pendeklarasian Array 2 dimensi

var

   arrayName: array[1..x, 1..y] of element-type;

Contoh Khasus2
Mengubah Khasus1 menjadi bentuk array 2 dimensi

program Khasus2;

var

   data  : array [1..3,1..3] of string[30]; // asumsikan semua sebagai string

   i,j : integer;

begin

   data[1,1] := 'Helmi';

   data[1,2] := 'Tasik';

   data[1,3] := '15';  // mengisi array data di baris 1 kolom3 dengan kota

   data[2,1] := 'HAKIM'; // mengisi array data di baris 2 kolom1 dengan nama

   data[2,2] := 'Garut';

   data[2,3] := '17';

   data[3,1] := 'Faisal Haim';

   data[3,2] := 'Bandung'; // mengisi array data di baris 3 kolom 2 dengan kota

   data[3,3] := '16';

   For j := 1 to 3 do // perulangan baris array

   Begin

       For i := 1 to 3 do // perulangan kolom array

       Begin

        writeln('isi data di baris ', j ,' kolom ', i ,' : ', data[j,i]);  // menampilkan array baris ke j kolom ke i

       End;

       writeln(' ');

   End;

end.

Hasilnya

isi data di baris 1 kolom 1 : Helmi

isi data di baris 1 kolom 2 : Garut

isi data di baris 1 kolom 3 : 15

isi data di baris 2 kolom 1 : HAKIM

isi data di baris 2 kolom 2 : Garut

isi data di baris 2 kolom 3 : 17

isi data di baris 3 kolom 1 : Faisal Hakim

isi data di baris 3 kolom 2 : Bandung

isi data di baris 3 kolom 3 : 16

Gimana teman - teman mudah kan array? hehe, array dapat membantu kita menyelesaikan banyak sekali khasus dalam pemprograman, selain itu juga dapat menghemat penggunaan variable dengan nilai lebih dari 1.

OK cukup sekian dulu belajar kita kali ini hehe, sampaijumpa .....