ARRAY (LARIK)

• Array (larik) merupakan tipe data terstruktur yang berguna untuk menyimpan sejumlah data yangbertipe sama.

• Fungsi Array
Sebagai langkah efisiensi penggunan memori komputer, sebab data elemen array dialokasikan pada suatu deretan sel memori tertentu. Hal ini jauh lebih efisien dibandingkan dengan jika kita mendefinisikan masing-masing data pada suatu variabel tersendiri yang pastinya akan banyak menyita memori.
• Array dibedakan menjadi 2, yaitu:

1. Array Berdimensi Satu

Bentuk umum:

Nama tipe = Array [tipe ordinal] Of tipe elemen

Contoh:

Program Menghitung_Rata_Rata;
uses wincrt;
var x:array[1..10] of integer;
i,n:integer;
jumlah,u:real;
begin
write('berapa kali data yang anda masukkan ? ');readln(n);
for i:=1 to n do
begin
write ('masukkan data = ');readln(x[i]);
end;
begin
clrscr;
for n:= 1 to i do
writeln('data = ' ,(x[n]));
end;

jumlah:=0;
for i:=1 to n do
jumlah:=jumlah+(x[i]);
u:=jumlah/n;
writeln ('u = ' ,u:2:2);
end.


2. Array Berdimensi Banyak (multidimensi)

Bentuk umum:

Nama tipe = Array [tipe-indeks 1] Of Array [tipe-indeks 2] Of tipe larik
Contoh:
Program Matriks;
uses wincrt;
var tabel:array[1..3,1..2] of integer;
i,j:integer;
begin
tabel [1,1]:=50;
tabel [1,2]:=55;
tabel [2,1]:=21;
tabel [2,2]:=26;
tabel [3,1]:=10;
tabel [3,2]:=1;
for i:=1 to 3 do
begin
for j:=1 to 2 do
write(tabel[i,j],' ');
writeln;
end;
end.

Apabila program dijalankan, maka akan menghasilkan tampilan sebagai berikut: