Mengenali Pemrograman Array
ARRAY
Array atau larik merupakan istilah yang
digunakan dalam program pascal untuk menyimpan data bertipe sama dalam sebuah
urutan indeks akses. Array diibaratkan sebagai deret kotak yang berukuran
dimensi yang sama dan disusun sejajar.
Contoh : 23 | 45 | 56 | 1 | 7 |
Indeks :
1 2
3 4 5
Indeks 1 bernilai 23, indeks 2 bernilai 45,
indeks 3 bernilai 56, indek 4 bernilai 1 indeks 5 bernilai 7, jika elemen array
adalah x, setiap elemen array ditulis dengan notasi sebagai berikut :
Bilangan di dalam kurung siku menunjukkan indeks
elemen array, jadi ilustrasi array pada gamabar di atas di identifikasikan
sebagai berikut :
X
23
45
56
1
7
1.
Format deklarasi array
Dalam pendeklarasian array
hal yang harus diperhatikan :
a. Banyaknya elemen dalam
array
b. Tipe data tiap elemen array
Var
Nama array : [indeksAwal..indeksAkhir] of
TipeData;
Dalam pendeklarasian array, ada 3 bentuk fomat :
A.
Array sebagai nilai perubah
contoh :
var
Namamhsc: array [1..50] of
string;
B.
Penulisan array dengan tipe data baru
Contoh :
Type larikmana = array [1..20]
of string;
Var data : lariknama;
C.
Penulisan array elemen konstanta
Contoh :
Const max : lariknama;
2.
Inisialisasi dan akses indeks elemen array
Contoh : menyatakan nilai
ke dalam array
Program akses_array;
Uses crt;
Var i: array [1..10] of
string;
Begin
Clrscr;
i [1] : = ‘Asman Sofyan’;
i [2] : = ‘Anton Basuki’;
i [3] : = ‘Asep Nurohman’;
i [4] : = ‘Agus Samsudin’;
readln
end.
3.
Menentukan isi elemen array
Beberapa jenis metode yang
dapat dilakukan dalam menentukan isi elem array adalah sebagai berikut :
a. Secara manual
b. Dengan nilai maksimal
elemen yang sudah ditentukan dari awal
Untuk
memasukkan nilai data pada tiap elemen array, dapat memanfaatkan struktur
perulangan for...do dengan perulangan ForDo jumlah maksimal indeks elemen array
dapat ditentukan
Contoh
: menyipan data ke dalam array dengan For...Do
Program
simpan_For_Do;
Uses
crt;
Var
X
: array [1..20] of integer;
Y
: integer;
Begin
Clrscr;
For
Y := 1 to 20 do;
Begin
X
[Y] := Y ; {memasukkan nilai y ke dalam array x dengan indeks y}
End;
Readln;
End.