Record adalah salah satu tipe data struktur yang
terdapat pada pascal. Tipe data record dapat dikumpulkan dengan
beberapa item data yang masing-masing dapat mempunyai tipe data berbeda-beda.
Masing-masing item dapat disebut dengan field. Sehingga record merupakan
kumpulan field yang dapat berbeda-beda tipe. Biasanya satu record berisi
beberapa field untuk sebuah subjek tertentu.
Record merupakan sekumpulan elemen data atau field yang digabungkan menjadi satu kesatuan dengan tipe data yang bisa berbeda bisa sama. Meskipun field tersebut berada dalam satu kesatuan, namun masih dapat diakses secara individual.
Record merupakan sekumpulan elemen data atau field yang digabungkan menjadi satu kesatuan dengan tipe data yang bisa berbeda bisa sama. Meskipun field tersebut berada dalam satu kesatuan, namun masih dapat diakses secara individual.
Perbedaan Array dan Record:
Array mempunyai elemen-elemen data yang tipe
datanya harus sama (tidak boleh berbeda), misalnya dalam array terdapat empat
elemen yang semuanya mempunyai tipe data berupa integer. Sedangkan record mempunyai elemen-elemen data yang bisa bertipe
data sama dan juga berbeda, misalnya dalam satu tipe record terdapat elemen
yang masing-masing dari elemen tersebut mempunyai tipe data integer, boolean,
char, dan string.
Bentuk umum dari pendeklarasian record dalam pascal:
Type
Nama_record = record
Field1:tipe data 1;
Field2:tipe data 2:
.............................
.............................
Fieldn:tipe data n;
End;
Var
Nama_Variabel : Nama_record;
|
contoh program yang menggunakan record:
Program
bidang_ruang;
Uses
wincrt;
Type
Hasil=record
Panjang,lebar:real;
Segitiga:real;
Balok:real;
End;
Var
hsl:hasil;
begin
writeln(‘Masukkan Panjang
Bidang:’);readln(hsl.panjang);
writeln('Masukkan Lebar Bidang: ');
readln(hsl.lebar);
hsl.balok:=hsl.panjang*hsl.lebar;
hsl.segitiga:=1/2*hsl.panjang*hsl.lebar;
writeln;
writeln('Luas Segitiga adalah= ',
hsl.segitiga:7:2);
writeln ('Luas Balok adalah= ', hsl.balok:7:2);
end.
|
Materi Kuliah Program Komputer FMIPA UNSRI
#nakatanaki: "Semoga Bermanfaat ^o^"
Comments
Post a Comment