RECORD

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.

Perbedaan Record dan Array

• Elemen record bersifat heterogen, yaitu campuran beberapa tipe data, sedangkan elemen array bersifat homegen
• Elemen record didefisinisikan dengan simbol/identifer sedangkan elemen array diidentifikasi dengan indeks.

Bentuk umum record

type

nama_record = record

identifier_1 : tipe_data_1;

identifier_n : tipe_data_n;

end;

var variabel : nama_record;

CONTOH:

program nilai;
uses crt;
type mahasiswa = record
     nim : string[10];
     nama: string[35];
     nh,nt,nm,nf : integer;
     na:real;
end;
var
   mhs: mahasiswa;

 

Pengaksesan Elemen Record

      Nama variable disertai nama field.

x.Nama

x.Usia

x.Kota

x.Kodepos

CONTOH LATIHAN:

program nilai;
uses crt;
type mahasiswa = record
     nim : string[10];
     nama: string[35];
     nh,nt,nm,nf : integer;
     na:real;
end;
var
   mhs: mahasiswa;
   begin
   clrscr;
   writeln('aplikasi perhitungan nilai : ');
   write('masukkan nim : ');readln(mhs.nim);
   write('masukkan nama : ');readln(mhs.nama);
   write('masukkan nilai hadir : ');readln(mhs.nh);
   write('masukkan nilai tugas : ');readln(mhs.nt);
   write('masukkan nilai mid : ');readln(mhs.nm);
   write('masukkan nilai final : ');readln(mhs.nf);
   mhs.na := (0.10 * mhs.nh)+(0.25 * mhs.nt)+(0.30 * mhs.nm)+(0.35 * mhs.nf);
   write('total nilainya = ',mhs.na:10:2);
   end.