1 / 11

Minggu II STRUKTUR DATA

Minggu II STRUKTUR DATA. Gerlan A. Manu, ST. Record. Sama halnya dengan array, Record adalah kumpulan data. Perbedaannya dengan array : dalam array semua elemennya harus bertipe sama, sedangkan dalam record setiap elemen bisa mempunyai tipe data yg berbeda satu sama lain.

lacey
Download Presentation

Minggu II STRUKTUR DATA

An Image/Link below is provided (as is) to download presentation Download Policy: Content on the Website is provided to you AS IS for your information and personal use and may not be sold / licensed / shared on other websites without getting consent from its author. Content is provided to you AS IS for your information and personal use only. Download presentation by click this link. While downloading, if for some reason you are not able to download a presentation, the publisher may have deleted the file from their server. During download, if you can't get a presentation, the file might be deleted by the publisher.

E N D

Presentation Transcript

  1. Minggu IISTRUKTUR DATA Gerlan A. Manu, ST

  2. Record • Sama halnya dengan array, Record adalah kumpulan data. • Perbedaannya dengan array : dalam array semua elemennya harus bertipe sama, sedangkan dalam record setiap elemen bisa mempunyai tipe data yg berbeda satu sama lain. • Penggunaan array bisa di gabungkan dengan penggunaan record. • Contoh penggunaan record : rekaman data akademis, rekaman data gaji pegawai, inventory dll. • Bentuk Umum : Type pengenal = record medan1 : tipe1; medan2 : tipe2; . . . medan_n : tipe_n end;

  3. Contoh Deklarasi Type Siswa = record nama : String[25]; alamat : String[35]; kelamin : (L,P); end; Var Murid : Siswa;

  4. Input/Output dlm Record • Untuk memberikan nilai (input) suatu variabel dalam record, sama dengan variabel biasa yaitu dengan ReadLn. ReadLn(murid.nama); ReadLn(murid.alamat); ReadLn(murid.kelamin); • Untuk membaca nilai (output) dengan menggunakan WriteLn. WriteLn(murid.nama); WriteLn(murid.alamat); WriteLn(murid.kelamin);

  5. Statement With • Pengunaan readln dan writeln yang dapat dilihat pada slide sebelumnya bisa ditulis dengan statement with untuk mempermudah penulisan readln dan writeln. • Contoh readln : With Murid do Begin ReadLn(nama); ReadLn(alamat); ReadLn(kelamin); End; • Contoh Writeln : With Murid do Begin WriteLn(nama); WriteLn(alamat); WriteLn(kelamin); End;

  6. Contoh Record Luas Lingkaran Const Pi = 3,14; Type Hasil = Record Jari2 : real; Keliling : real; Luas : real; end; Var Lingkaran : Hasil; Begin write (‘Jari- Jari Lingkaran ‘); readLn (Lingkaran.jari2); Lingkaran.Luas := Pi*sqr(Lingkaran.Jari2); Lingkaran.Keliling := 2*Pi*Lingkaran.Jari2; writeLn (‘Keliling Lingkaran =‘, Lingkaran.Keliling; writeLn (‘Luas Lingkaran = ‘, Lingkaran.Luas; End.

  7. Contoh penggunaan With Const Pi = 3,14; Type Hasil = Record Jari2 : real; Keliling : real; Luas : real; end; Var Lingkaran : Hasil; Begin Wirg Lingkaran do Begin write (‘Jari- Jari Lingkaran ‘); readLn (jari2); Luas := Pi*sqr(Jari2); Keliling := 2*Pi*Jari2; writeLn (‘Keliling Lingkaran =‘, Keliling; writeLn (‘Luas Lingkaran = ‘, Luas; end; End.

  8. Contoh Kasus Penggunaan Array pada Record • Program Inventory Barang • Rekaman Jumlah Baju per Ukuran • Rekaman Harga Alat Musik per Merek • Dll • Program Akademik • Rekaman Nilai Matakuliah per Mahasiswa • Rekaman Jadwal Kuliah Per Semester • dll

  9. Contoh Kasus Type DataMhs = Record Nomor : Integer; Nama : String[20]; IP : Real; Var Jum, I, J : Integer; Mahasiswa : Array[1..50] of DataMhs;

  10. Lanjutan… Begin Write (‘Jumlah Mahasiswa ‘); ReadLn (Jum); for I := 1 to Jum Do Begin WriteLn; with mahasiswa[I] do Begin WriteLn; Write (‘masukan Nim mahasiswa ke ‘, I, ‘: ‘); readln(nomor) Write (‘masukan Nama mahasiswa ke ‘, I, ‘: ‘); readln(nomor) Write (‘masukan IP mahasiswa ke ‘, I, ‘: ‘); readln(nomor) end; End; ………………… (TUGAS II Lanjutkan program ini untuk menampilkan data mahasiswa yang telah dinputkan……….

  11. Contoh Hasil NIM MHS Nama MHS IP 1234 Ridwan 3.15 1235 Anton 3.01 1236 Erwin 2.77 1237 Donna 2.50

More Related