...

RECORD

by user

on
Category: Documents
1

views

Report

Comments

Description

Transcript

RECORD
RECORD
Pascal menyediakan tipe data terstruktur yang disebut
record. Dengan tipe data record, dapat dikumpulkan beberapa item
data yang masing-masing mempunyai tipe data berbeda-beda. Masing
– masing item data disebut field. Record terdiri dari kumpulan
field yang dapat berbeda tipe.
Deklarasi Record
Tipe record : record
Daftar field
------End;
Contoh :
Type
Lgn = record ;
Kode
Nama
Alamat
Piutang
End ;
:
:
:
:
integer ;
string[35] ;
string[45] ;
real ;
Var
Langganan : Lgn;
Menggunakan Tipe Data Record
Tipe-tipe komponen field dari record dapat dipergunakan dengan
cara menuliskan :
Pengenal-record.pengenal-field[.pengenal-field]
Record
1
Contoh :
Langganan.Nama := ‘ Rhea Fatma ‘ ;
Statemen With
Penulisan pengenal-field seperti contoh diatas
lebih singkat, sehingga penulisannya menjadi :
dapat
ditulis
Nama := ‘ Rhea Fatma ‘ ;
Ini dapat dilakukan dengan menggunakan statemen with yang
menyebutkan pengenal-recordnya, sehingga penggunaan field-field
selanjutnya sudah tidak perlu menyebutkan pengenal recordnya
kembali.
Contoh :
Type
Hasil = record
Jarijari : real ;
Keliling : real ;
Luas
: real ;
End ;
Var
Lingkaran : hasil;
Begin
With Lingkaran do
Begin
Write (‘jari-jari lingkaran =’); readln (Jarijari);
Keliling := 2 * PI* Jarijari;
Luas := PI * sqr (Jarijari);
Writeln;
Writeln (‘Keliling lingkaran =’, Keliling);
Writeln (‘Luas lingkaran =’, Luas);
End;
End.
Record
2
Tipe Data Record Dengan Field Tipe Record
Tipe data record dapat juga mempunyai field berupa tipe data
record yang lainnya. Misalkan seperti item-item ini :
1. Nama pegawai
2. Tanggal masuk
a. hari
b. bulan
c. tahun
3. Alamat pegawai
a. Jalan
b. Kota
Contoh :
Type
Tgl
= record
Hari
Bulan
Tahun
End;
Almt = record
Jalan
Kota
End;
Pegawai= record
Nama
Tglmasuk
Alamat
: 1..31;
: 1..12;
: word;
: string[35];
: string[25];
: string[30];
: Tgl;
: Almt;
End;
Var
DataPegawai : Pegawai;
Begin
------end.
Record
3
Record Bervariasi
Dapat dibuat suatu record yang mempunyai field yang tidak
pasti atau bervariasi (variant record). Dalam variant record,
dapat mengandung suatu field yang bervariasi tergantung dari
suatu kondisi. Bila didalam suatu variant record terdapat field
yang tetap, maka field yang bervariasi letaknya harus setelah
field yang tetap.
Contoh :
Type
Tipebacaan
Bacaan
=
=
(bukuteks, majalah);
record
Kodeperpus
: string[7];
Tglbeli
: stirng[8];
Penerbit
: string[25];
Case Tipe : Tipebacaan of
Majalah
: (nomor:string[10]);
BukuTeks : (pengarang :string;
Edisi
: byte)
End;
Penjelasan contoh :
Field yang bervariasi dalam record tergantung dari suatu kondisi
Case. Tipe field tag yang dipergunakan adalah suatu tipe data
scalar Tipebacaan yang mempunyai2 nilai konstanta, yaitu :
Bukuteks dan Majalah. Bila pengenal tipe bernilai Majalah, maka
field variant yang akan digunakan adalam nomor. Bila pengenal
tipe bernilai Bukuteks, maka field variant yang akan digunakan
adalah Pengarang dan Edisi. Jadi field yang digunakan akan
bervariasi tergantung dari suatu kondisi.
Record
4
Fly UP