BAB VI
ARRAY
6.1. Pengertian Array
Array
(larik) merupakan tipe data tersetruktur dimana didalamnya terdiri dari
komponen – komponen yang mempunyai tipe data yang sama. Didalam suatu
array jumlah komponen banyaknya adalah tetap. Didalam suatu larik atau
array setiap kompoenen ditunjukan oleh suatu index yang unik. Index dari
setiap komponen array menunjukan urutan data atau identitas yang
mewakili data yang ada didalamnya.
Logika sederhananya array itu bisa
disamakan dengan dua orang dengan nama yang sama didalam suatu
komunitas, untuk membedakan antara nama yang satu atau dengan nama yang
lain maka diberikan initial tambahan untuk setiap nama.
6.2. Deklarasi Array
Didalam
penulisan bahasa pemograman setiap penggunaan array harus dideklarsikan
terlebih dahulu. Pendeklarasian array diawali dengan nama variabel
array diikuti dengan indeks array yang dituliskan didalam tanda “[]” ,
diikuti dengan kata cadangan of dan tipe data yang dibutuhkan.
Bentuk Umum Penulisan
Tanda_pengenal : array [..tipe index ..] of tipe data;
Contoh :
Var
A : array[1..4] of integer;
B : array[1..5] of string;
C: array[1..10] of real;
Keterangnan :
A,B,C merupakan tanda pengenal/ nama variabel dari array;
1..4 : merupakan tipe indek dari array, yang menunjukan banyaknya data yang mampu disimpan.
Integer : menunjukan bahwa data yang diinput berupa bilangan bulat.
6.3. Alokasi Penggunaan Array
a. Array Static (Static Array)
array
static adalah model pendeklarasian array dimana tipe data yang
digunakan mempunyai nilai yang tetap. Nilai yang digunakan untuk
menentukan jangkauan pada umumnya bernilai integer. Array Static juga
bisa disebut Array dengan deklarasi tipe indeks subrange integer.
Bentuk Umum
array[indexType1, ..., indexTypen] of baseType
Keterangan
= index type menunjukan tipe data ordinal yang menunjukan batasan atau
elemen maksimul terhadap seberapa besar variabel tersebut menyimpan
komponen.
Contoh
Var arrayku : array[1..5] of char
Atau juga
type
jangkauan = 1..5;
var
nilai : array[jangkauan] of integer;
b. Array Dinamis (Dynamic arrays)
Larik
atau array dinamis merupakan array yang tidak mempunyai suatu jangkauan
atau ukuran yang tetap. Tetapi ketika program dijalankan maka memori
untuk suatu array dinamis direalokasikan ketika kita menugaskan suatu
nilai kepada array. Dynamic-Array jenis ditandai oleh konstruksi
(menyangkut) format
Bentuk Umum
array of baseType
Contoh
var nilai: array of Real;
Dari
deklarasi tersebut nilai yang merupakan deklarasi array belum
memperoleh nilai yang tetap, tetapi hanya diberikan batasan sebagai tipe
data real. Untuk mendeklarasikan array tersebut kita harus menempatkan
array didalam suatu memori, caranya adalah dengan memanfaatkan fungsi
dari perintah sellength.
Selllength(nilai,20)
Dari
penggalan program tersebut nilai untuk array nilai tersebut mempunyai
range sebanyak atau cakupan 20 untuk tipe data real, dengan indeex
dimulai dari 0 sampai dengan 20.
6.4. Studi Kasus program dengan Array
a. Hasil ketika form Dijalankan
Gambar 5.1 Form Konversi Tanggal
b. Desain Properties
Object Caption/Text Name
Label 1 Tanggal Label1
Label 2 Bulan Label2
Label 3 Tahun Label3
Label 4 Hari Pada Tanggal tersebut Adalah Label4
GroupBox1 Entry Tanggal Groupbox1
Edit1 - Etgl
Edit2 - Ebln
Edit3 - Etahun
Edit4 - Ehari
Command1 OK bok
c. Listing Program
Program untuk Command OK
procedure TForm12.bhariClick(Sender: TObject);
type
x = string[7];
const
faktorbln : array[1..12] of byte = (0,3,3,6,1,4,6,2,5,0,3,5);
hari : array[0..8] of
x=('Minggu','Senin','Selasa','','Rabu','Kamis','','Jum''at','Sabtu');
var
hr : string;
nama : string[255];
j1,j2,j3,j4 : integer;
tanggal,bulan,tahun : integer;
begin
tanggal := strtoint(etgl.Text);
bulan := strtoint(ebln.Text);
tahun := strtoint(ethn.Text);
if tahun > 1900 then tahun := tahun - 1900;
j1 := trunc(tahun * 365.25);
j2 := j1 + faktorbln[bulan];
if (tahun/4 = int(tahun/4)) and (bulan < 3) then j2 := j2-1;
j3 := j2 + tanggal;
j4 := trunc(frac(j3/7) * 10);
hr := Hari[j4];
ehari.Text := hr;
end;
