Rabu, 03 Juni 2009 |
RECORD |
RECORD (REKAMAN) Sebuah record rekaman disusun oleh beberapa field. Tiap field berisi data dari tipe dasar / bentukan tertentu. Record mempunyai kelebihan untuk menyimpan suatu sekumpulan elemen data yang berbeda-beda tipenya (di banding array). Contoh , sebuah record dengan empat buah field. Cara pendeklarasian dari record adalah sbb: • Mendefinisikan tipe dari record (jumlah field, jenis tipe data yang dipakai), • Mendefinisikan variabel untuk dilakukan operasi. SYNTAX type nama_record = record identifier_1 : tipe_data_1; : : identifier_n : tipe_data_n; end; var variabel : nama_record; Contoh. type Data_mahasiswa = record Nama : string; Usia : integer; Kota : String; Kodepos : integer; end; Var x: Data_mahasiswa; 1. Pengaksesan Elemen Record Nama variable disertai nama field. x.Nama x.Usia x.Kota x.Kodepos Contoh. program RECORD_INTRO;
type tanggal = record bulan, hari, tahun : integer; end; var waktu : tanggal; begin waktu.hari :=25; waktu.bulan:=09; waktu.tahun:= 1983; writeln('hari ini adalah ',waktu.hari,':',waktu.bulan,':', waktu.tahun) end.
2. Pengunaan With … do Pernyataan with untuk lebih menyederhanakan pengaksesan field-field pada record. Pemrograman dapat mengakses field cukup dengan menyebutkan nama field-nya saja. Misalkan pernyataan : x.Nama x.Usia x.Kota x.Kodepos menjadi with x do Begin Nama Usia Kota Kodepos end Contoh. program RECORD_INTRO; type tanggal = record bulan, hari, tahun : integer; end; var waktu : tanggal; begin {program utama} with waktu do {mulai with} begin hari :=25; bulan:=09; tahun:=1983; writeln('hari ini adalah ',hari,':',bulan,':', tahun) end {akhir with} end.
3. Array dari Record Suatu array dapat juga berisi record contoh suatu deklarasi record tanggal. type tanggal = record bulan, hari, tahun : integer; end; var waktu : tanggal;
kemudian kita membentuk suatu array dari record ini, namakan birthdays. var birthdays : array[1..10] of tanggal; pernyataan ini akan membentuk suatu array dengan 10 elemen. Dimana tiap elemen adalah sebuah record tanggal, yaitu, terdiri atas bulan, hari, tahun dengan tipe data Integer. Contoh Pemberian nilai awal dari masing-masing elemen birthdays: Birthdays[1].hari :=25; Birthdays[1].bulan:=09; Birthdays[1].tahun:=1983;
4. Record di dalam Record Record bisa berisi record lain sebagai field. Seperti contoh record tanggal dan jam dikombinasikan menjadi sebuah record saat ini,
type tanggal = record bulan, hari, tahun : integer; end; type waktu =record jam, menit, detik : integer; end; type waktu_ini =record tanggal_ini : tanggal; waktu_ini : waktu end;
Kemudian kita perlu membuat variabel kerja var saat_ini : waktu_ini; pemberian nilai akan terjadi seperti di bawah ini: saat_ini.tanggal.bulan:= 11; saat_ini.tanggal.hari:= 2; saat_ini.tanggal.tahun:= 1985; saat_ini.waktu.jam:= 3; saat_ini.waktu.menit:= 3; saat_ini.waktu.detik:= 33; |
posted by asy syaghaf @ 6/03/2009 09:18:00 PM |
|
|
|
|
About Me |
Name: asy syaghaf
Home: Pekanbaru, Riau
About Me: saya hanya seorang gadis biasa yang tengah berjuang menelusuri jati diri.
See my complete profile
|
Previous Post |
|
Archives |
|
Shoutbox |
Lorem ipsum dolor sit amet, consectetuer adipiscing elit. Duis ligula lorem, consequat eget, tristique nec, auctor quis, purus. Vivamus ut sem. Fusce aliquam nunc vitae purus. |
Links |
- link 1
- link 2
- link 3
- link 4
|
Powered by |
|
|