Contoh Program:
Type
Lgn= Record
Kode : integer;
Nama : string[35];
Piutang : real;
End;
Var Langganan : Lgn;
Menggunakan Tipe Data Record
Tiap-tiap komponen field dari record dapat dipergunakan dengan cara menuliskan pengenalrecord.pengenalfield
Contoh Program:
Langganan.Nama :=’Maulana’;
|| |______pengenal field
||__________ pengenal record
Penulisan statemen diatas dapat menyebabkan statement menjadi panjang
Contoh lain :
Lingkaran.keliling := 2 * Pi * Jari Jari;
Menggunakan statemen With Do menjadi :
With Lingkaran Do
Begin
Keliling ; 2 * Pi * JariJari ;
End;
Contoh :
Uses Crt;
Type
Recsis = Record
Nama : String[15];
Nu : byte;
End;
Var DataSis : Array[1..10] of RecSis;
X, JD : Byte ;
Pred : String[6] ;
BEGIN
CLRSCR ;
Write( ‘ Jumlah Data : ‘ ) ; Readln(JD);
For X := 1 To JD Do
Begin
Write( ‘ Nama Siswa : ‘ ) ; ReadLn(Datasis[x].Nama) ;
Write( ‘ Nilai Ujian : ‘ ) ; ReadLn(Datasis[x].Nu) ;
End;
For X := 1 To JD Do
Begin
With Datasis[X] Do
Begin
IF Nu > 60 Then Pred := ‘Lulus’;
Else Pred =: ‘Gagal’ ;
WriteLn(X, ‘ ‘ , Nama:10, ‘ ‘ ,Nu:2, ‘ ‘ ,Pred:6);
End;
End;
ReadLn;
END.
Jadi secara sederhana record merupakan tipe data tersetruktur yang terdiri dari beberapa data, kemudian masing-masing data tersebut disebut sebagai field.
Demikianlah penjelasan tentang record dan filed di bahass pemerograman pascal, semoga bisa membantu kalian yang sedang belajar atau mencari materi ini. Terimakasih banyak sudah berkunjung, jangan lupa sahre dan komen ya.
