Menggunakan Type Data Record Pada Pascal
Menggunakan Type Data Record Pada Pascal - Menggunakan type data record pada pascal untuk menampung beberapa inputan. Misalnya kita ingin menampung beberapa inputan menggunakan satu buah variable.
Record sekilas mirip array, dan pada penggunaan berikut juga saya menggunakan array untuk melakukannya.
Kode Menggunakan Record pascal dibawah ini sederhana, sekedar bahan saya mencoba saja, untuk penambahan variable lain selain nama silahkan di modifikasi di bagian type.
berikut kode penggunaan type data record pada pascal:
program cobaRecord;
uses crt;
type rcMhs=record
nama : string[25];
end;
var
mhs:array[1..100] of rcMhs;
i,j:integer;
begin
clrscr;
write('Masukkan Jumlah Data : ');readln(i);
for j:=1 to i do
begin
writeln('Data Mahasiswa Ke-',j);
with mhs[j] do
begin
write('Nama : '); readln(nama);
end;
end;
writeln('===============================================================');
writeln('Nama ');
for j:=1 to i do
begin
with mhs[j] do
begin
writeln(nama);
end;
end;
readln;
end.