Record merupakan salah satu tipe data terstruktur. Record terdiri dari kumpulan field yang dapat berbeda tipe untuk subyek tertentu. Misalnya record langganan terdiri dari field kode langganan, nama langganan, alamat langganan dan besarnya piutang. Syntax record nampak pada gambar di bawah ini
Contoh:
program rumus_lingkaran;
uses wincrt;
type
hasil = record
jarijari : real;
keliling : real;
luas : real;
end;
var
lingkaran : hasil;
begin
write ('jari-jari lingkaran? '); readln (lingkaran.jarijari);
lingkaran.keliling := 2*pi*lingkaran.jarijari;
lingkaran.luas := pi*sqr(lingkaran.jarijari);
writeln;
writeln ('keliling lingkaran = ', lingkaran.keliling:7:2);
writeln ('luas lingkaran = ', lingkaran.luas:7:2);
end.
Record yang mempunyai field yang tidak sama atau bervariasi dalam suatu variant disebut record bervariasi. Sintax record bervariasi nampak pada gambar di bawah ini:
Materi Praktikum
Unduh materi prktikum di bawah ini kemudian praktekan menggunakan aplikasi pascal
Tugas
Buatlah semuah program pascal menggunakan tipe record untuk memasukan data nasabah sebanyak N, N diinputkan menggunakan papan ketik (keyboard), kemudian tampilkan data nasabah dalam bentuk matrik. Tentukan apakah menggunakan record yang tetap atau record yang bervariasi. Jelaskan alasan anda mengguanakan jenis record tersebut!
Petunjuk :
Gunakan notasi pengulangan untuk menyelesaikan permasalahan tersebut. Tugas dikumpulkan pada pertemuan selanjutnya.
Tidak ada komentar:
Posting Komentar