1 / 20

RECORD Struktur Data

RECORD Struktur Data. Definisi. Tipe data record merupakan tipe data terstruktur. Tipe data record digunakan untuk menyimpan sejumlah data dengan nilai dengan tipe data yang berbeda dalam satu wadah. Perbedaan Record dan Array. larik semua elemenya harus bertipe sama

andren
Download Presentation

RECORD 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. RECORDStruktur Data

  2. Definisi • Tipe data record merupakan tipe data terstruktur. • Tipe data record digunakan untuk menyimpan sejumlah data dengan nilai dengan tipe data yang berbeda dalam satu wadah.

  3. Perbedaan Record dan Array • larik semua elemenya harus bertipe sama • Record semua elemenya harus bertipe berbeda antara satu sama lainnya.

  4. Deklarasi Penulisan Type Pengenal = Record Namafield-1 : Type Namafield-2 : Type …… Namafield-N : Type End

  5. Atau dapat juga dideklarasikan sebagai berikut: Var Pengenal = Record Namafield-1 : Type Namafield-2 : Type …… Namafield-N : Type End

  6. Contoh type data_pegawai = record kd_peg : string[5]; nama : string[15]; alamat : string[20]; gaji : longint; end; var pegawai : data_pegawai;

  7. atau langsung di deklarasikan di varibel : var pegawai : record kd_peg : string[5]; nama : string[15]; alamat : string[20]; gaji : longint; end;

  8. Contoh program : type data_pegawai = record kd_peg : string[5]; nama : string[15]; alamat : string[20]; gaji : longint; end; var pegawai : data_pegawai;

  9. Contoh program (Lanj) begin pegawai.kd_peg := ‘001'; pegawai.nama := ‘Andi Sujarwo'; pegawai.alamat:= ‘Jl. Kyi Telingsing No 56 Kudus'; pegawa.gaji:=1500000; writeln(‘Kode Pegawai :‘,pegawai.kd_peg); writeln(‘Nama :',pegawai.nama); writeln(‘Alamat :',pegawai.alamat); writeln(‘Gaji :',pegawai.gaji); readln; end.

  10. Statement With • Digunakan untuk mempersingkat penulisan dalam pembacaan field, • Penulisan : with namaRecord do

  11. Contoh program : begin clrscr; with pegawai do begin kd_peg := ‘001'; nama := ‘Andi Sujarwo'; alamat:= ‘Jl. Kyi Telingsing No 56 Kudus'; gaji:=1500000; end;

  12. Record dalam array • Dalam contoh sebelumnya penggunan tipe data record hanya dapat menyimpan satu record. • Untuk dapat menyimpan sejumlah record maka dapat digunakan array yang bertipe record yang sudah didifinisikan

  13. Contoh program : type data_pegawai = record kd_peg : string[5]; nama : string[15]; alamat : string[20]; gaji : longint; end; var pegawai : array[1..10] of data_pegawai; i : integer;

  14. Contoh program (Lanj) begin clrscr; for I:= 1 to 10 do begin with pegawai[i] do

  15. Field record bertipe array • Jika dalam suatu record terdapat beberapa field yang sama tipenya dapat digunakan array. • Contoh ada data barang yang mempunyai struktur. - Nama barang -> bertipe String - Jumlah unit barang ke 1 -> bertipe Byte - Jumlah unit barang ke 2 -> bertipe Byte - Jumlah unit barang ke 3 -> bertipe Byte

  16. Contoh type data_brg = record namaBrg : string[15]; unitBrg : array[1..3] of byte; end; var Barang : array[1..10] of data_brg;

  17. Tipe data record dengan field tipe record • Dalam Turbo Pascal tipe data record dapat didefinisikan juga sebagai field dari suatu record. • Artinya suatu record dapat juga mempunyai field yang merupakan record.

  18. Contoh: sebuah data pegawai mempunyai struktur sebagai berikut : - Nama pegawai -> string - Mulai masuk -> - Tgl - Bln - Thn - Alamat pegawai -> - Jalan - Kota - Gaji -> - Gaji pokok - Lembur - Tunjangan

  19. Contoh type masuk = record tgl : 1..31; bln : 1..12; thn : integer; end; alamat = record jalan : string[20]; kota : string[10]; end;

  20. Contoh (Lanj) gajipeg = record pokok,tunjangan,lembur : real; end; datapegawai = record nama : string[20]; tglmasuk : masuk; almt : alamat; gaji : gajipeg; end;

More Related