350 likes | 567 Views
Dasar Pemrograman ARRAY/LARIK. ARRAY (LARIK). 1. Pengertian Array Array adalah struktur data yang menyimpan sekumpulan elemen yang bertipe sama.
E N D
DasarPemrograman ARRAY/LARIK
ARRAY (LARIK) 1. Pengertian Array Array adalah struktur data yang menyimpan sekumpulan elemen yang bertipe sama. Setiap elemen diakses langsung melalui indeksnya. Indeks tersebut haruslah tipe data yang mempunyai keterurutan, misalnya integer atau karakter. Nama lain array adalah larik, tabel, atau vektor.
2. Cara Pendefinisian Array Array adalah struktur data statik, artinya jumlah elemen larik harus sudah diketahui sebelum program dieksekusi. Mendefinisikan array pada bagian deklarasi adalah : • Mendefinisikan banyaknya elemen array • Mendefinisikan tipe elemen array Cara pendefinisian array pada bagian deklarasi Dapat dilakukan dengan cara sebagai berikut :
a. Sebagai Peubah (Variabel) Contoh : Misalkan L adalah nama peubah array yang mempunyai 100 elemen yang bertipe integer, maka dapat dituliskan : {Deklarasi} var L : array[1..100] of integer;
b. Sebagai Tipe Baru Misalkan LarikInt didefinisikan sebagai sebuah tipe baru untuk array yang bertipe integer. Banyak elemen array 100 buah elemen, maka dapat ditulis sebagai berikut : {Deklarasi} type LarikInt : array[1..100] of integer; var P : LarikInt;
c. Mendefinisikan Ukuran Maksimum Elemen Array Sebagai Sebuah Konstanta Misalkan LarikInt didefinisikan sebagai nama sebuah tipe baru untuk array yang bertipe integer. Banyak elemen maksimum 100 elemen. P adalah array bertipe integer {Deklarasi} const Nmaks = 100; type LarikInt : array[1..Nmaks] of integer; var P : LarikInt;
3. Cara Mengacu Elemen Array Elemen Array diacu melaui indeksnya. Nilai Indeks harus terdefinisi. Contoh cara mengacu elemen array : L[5] P[k], asalkan k telah terdefinisi Contoh menggunakan elemen array : L[4] :=10; read(P[k]); if HargaBarang[t]<1000 then writeln(‘Harga Murah’) else writeln(‘Harga Mahal’);
4. Pemrosesan Array Pemrosesan beruntun pada array adalah pemrosesan mulai dari elemen pertama array (yaitu elemen indeks terkecil, berturut-turut elemen berikutnya, sampai elemen terakhir dicapai, yaitu elemen dengan indeks terbesar) Skema umum algoritma memproses array (disebut juga skema mengunjungi/traversal array) adalah :
Algoritma_skema_umum_pemrosesan_array { Memproses setiap elemen array secara beruntun, mulai dari indeks terkecil sampai indeks terbesar} Deklarasi const Nmaks = 100 {banyaknya elemen array} type LarikInt : array[1..Nmaks] of integer var A : LarikInt k : integer {indeks array}
Deskripsi Inisialisasi {Pemberian nilai awal} k ← 1 {mulai dari elemen pertama} while k ≤ Nmaks do Pemrosesan terhadap A[k] k ← k + 1 {tinjau elemen berikutnya} endwhile {akhir pengulangan k > Nmaks} Terminasi {Penulisan hasil}
Atau dapat juga menggunakan struktur for..do : Deskripsi Inisialisasi {Pemberian nilai awal} for k ←1 to Nmaks do Pemrosesan terhadap A[k] endfor Terminasi {Penulisan hasil}
4.1. Jumlah Elemen Efektif Array Bila sebuah array A didefinisikan 100 elemen, mungkin tidak seluruh seratus elemen yang dipakai. Banyaknya elemen array yang dipakai disebut jumlah elemen efektif Jumlah elemen efektif disimpan dalam nama peubah tertentu misalnya N
4.2. Array Bertipe Terstruktur Elemen array dapat juga bertipe terstruktur. Misalkan TabMhs adalah sebuah array yang elemennya menyatakan nilai ujian seorang mahasiswa untuk suatu mata kuliah (MK) yang ia ambil. Data setiap mahasiswa adalah NIM (Nomor Induk Mahasiswa), Nama Mahasiswa, Mata Kuliah yang diambil dan Nilai Mata Kuliah Tersebut.
Maka Pendefinisiannya adalah sbb : Deklarasi const Nmaks = 100 type Mahasiswa = record <NIM : String NamaMhs : String KodeMK : String Nilai : char > TabMhs : array[1..Nmaks] of Mahasiswa
Cara Mengacu Elemen TabMhs Contoh cara mengacu elemen : 1. Elemen Kedua dari TabMhs TabMhs[2] 2. Mengacu field NIM dari elemen kedua Array TabMhs[2].NIM 3. Mengacu field KodeMK dari elemen kedua array TabMhs[2].KodeMK Karena record merupakan tipe terstruktur, pencetakan elemen tidak dapat dilakukan dengan bentuk sebagai berikut : write(TabMhs[k])
Tapi harus dengan cara sebagai berikut : write(TabMhs[k].NIM, TabMhs[k].NamaMhs, TabMhs[k].KodeMK, TabMhs[k].Nilai) Namun pengisian nilai elemen ke elemen berikutnya Dengan penulisan berikut adalah benar : TabMhs[k] ←TabMhs[k+1] Bentuk tersebut sama dengan pengisian perfield Sbb : TabMhs[k].NIM ← TabMhs[k+1].NIM TabMhs[k].NamaMhs ← TabMhs[k+1].NamaMhs TabMhs[k].KodeMK ← TabMhs[k+1].KodeMK TabMhs[k].Nilai ← TabMhs[k+1].Nilai
4.3. Menginisialisasi Array Menginisialisasi array adalah memberikan harga awal untuk seluruh elemen array. Inisialisasi elemen array misalnya mengosongkan elemen array sebelum dipakai untuk proses tertentu. Menginisialisasi array bertipe numerik dapat berupa pengisian elemen array dengan nol sedangkan pada array karakter berarti mengisi elemen array dengan spasi atau karakter kosong
a. Menginisialisasi Elemen Array dengan 0 (nol) Procedure Inisialisasi(output A : LarikInt, input N : integer) {K. Awal : N adalah jumlah elemen efektif array, misalnya sudah terdefinisi K. Akhir : Seluruh elemen array A bernilai 0 Proses : Menginisialisasi setiap elemen array A[1..N] dengan 0 } Deklarasi k : integer {pencatat indeks array} Deskripsi for k ←1 to N do A[k] ← 0 endfor
b. Menginisialisasi Elemen Array masing-masing dengan 1,2,3,…N Procedure Inisialisasi(output A : LarikInt, input N : integer) {K. Awal : N adalah jumlah elemen efektif array, misalnya sudah terdefinisi K. Akhir : Seluruh elemen array A bernilai k Proses : Menginisialisasi setiap elemen array A[1..N] dengan 1,2,3…N } Deklarasi k : integer {pencatat indeks array} Deskripsi for k ←1 to N do A[k] ← k endfor
4.4. Mengisi Elemen Array dari Piranti Masukan Procedure Baca(Input A : LarikInt, input N : integer) {K. Awal : N adalah jumlah elemen efektif array, misalnya sudah terdefinisi K. Akhir : Seluruh elemen array A berisi nilai yang dibaca. Proses : Mengisi setiap elemen array A[1..N] dengan nilai yang dibaca dari piranti masukan } Deklarasi k : integer {pencatat indeks array} Deskripsi for k ←1 to N do read(A[k]) endfor
4.5. Menulis Elemen Array Ke Piranti Keluaran Procedure Tulis(input A : LarikInt, input N : integer) {K. Awal : N adalah jumlah elemen efektif array, misalnya sudah terdefinisi K. Akhir : Seluruh elemen array A telah tercetak. Proses : Mencetak setiap elemen array A[1..N] ke piranti keluaran } Deklarasi k : integer {pencatat indeks array} Deskripsi for k ←1 to N do write(A[k]) endfor
Menghitung Nilai Rata-rata Procedure HitungRata(input A : LarikInt , input N : integer, output u : real) {K. Awal : N adalah jumlah elemen efektif array, misalnya sudah terdefinisi K. Akhir : U berisi rata-rata elemen array Proses : Menghitung rata-rata elemen array A[1..N] }
Mencari Nilai Maksimum Array Procedure CariMaks(input A : LarikInt , input N : integer, output Maks : integer) {K. Awal : N adalah jumlah elemen efektif array, misalnya sudah terdefinisi K. Akhir : Maks berisi elemen array yang maksimum Proses : Mencari elemen array A[1..N] yang maksimum }
Mencari Nilai Minimum Array Procedure CariMin(input A : LarikInt , input N : integer, output Min : integer) {K. Awal : N adalah jumlah elemen efektif array, misalnya sudah terdefinisi K. Akhir : Min berisi elemen array yang minimum Proses : Mencari elemen array A[1..N] yang minimum }
Contoh-contoh yg lebih kompleks Misalkan akan disimpan data nilai-nilai mata kuliah mahasiswa pada sebuah array bernama TabMhs dengan field mahasiswa terdiri dari NIM, NamaMHs, dan MataKuliah. Mata kuliah yang diambil mempunyai field KodeMk, NamaMK, dan Nilai. Maka Algoritmanya adalah sebagai berikut :
Algoritma Baca_Array_Mahasiswa { Mengisi elemen array mahasiswa dengan data yang dibaca ari piranti masukan } Deklarasi const Nmaks = 100 type MataKuliah = record <KodeMK : String, NamaMK : String, Nilai : Char >
type Mahasiswa = record <NIM : String, NamaMhs : String, MK : array[1..4] of MataKuliah > TabMhs : array[1..Nmaks] of Mahasiswa i, j : integer N : integer Deskripsi
read(N) for i ← 1 to N do read(TabMhs[i].NIM) read(TabMhs[i].NamaMhs) for j ← 1 to 4 do read(TabMhs[i].MK[j].KodeMK) read(TabMhs[i].MK[j].NamaMK) read(TabMhs[i].MK[j].Nilai) endfor endfor
Soal-soal 1. Dalam rangka ulang tahun sebuah toserba memberikan diskon sebesar 15% untuk seluruh barang. Misalkan data Kode Barang dan Harga Jual Barang tersebut telah diisikan ke dalam array HargaJual. HargaJual bertipe LarikBarang. Buatlah pendefinisian permasalahan tersebut pada bagian deklarasi dan buatlah prosedur untuk menurunkan harga barang tersebut.
2. Diberikan sebuah array integer A yang berukuran N elemen. Array A sudah terdefinisi elemen-elemennya. Buatlah prosedur untuk mencari elemen X dalam array yang keluarannya adalah indeks dari tempat elemen X ditemukan 3. Diberikan sebuah array integer A yang berukuran N elemen. Array A sudah terdefinisi elemen-elemennya. Buatlah prosedur untuk menghitung banyaknya elemen ganjil dalam array yang keluarannya adalah banyaknya elemen ganjil yang ditemukan.
4. Diberikan sebuah array integer A yang berukuran N elemen. Array A sudah terdefinisi elemen-elemennya. Buatlah fungsi untuk mengirimkan banyaknya elemen array. 5. Diberikan sebuah array integer A yang berukuran N elemen. Array A sudah terdefinisi elemen-elemennya. Buatlah fungsi untuk menghitung jumlah elemen array.
6. Diberikan sebuah array integer A yang berukuran N elemen. Array A sudah terdefinisi elemen-elemennya. Elemen array tersebut tersusun terurut membesar. Buatlah fungsi untuk mengirimkan elemen array yang paling maksimum dan sebuah fungsi untuk mengirimkan elemen array yang paling minimum. 7. Diberikan sebuah array integer A yang berukuran N elemen. Array A sudah terdefinisi elemen-elemennya. Buatlah Prosedur untuk menghitung jumlah elemen array yang negatif.
8. Diberikansebuah array integer A yang berukuran N elemen. Array A sudahterdefinisielemen-elemennya. Buatlahproseduruntukmenghitung rata-rata elemen array yang genap. 9. Diberikansebuah array integer A yang berukuran N elemen. Array A sudahterdefinisielemen-elemennya. Buatlahfungsiuntukmenghitungbanyaknyaelemen yang kelipatan 5 danjumlahelemen array yang kelipatan 5.