Senin, 10 Oktober 2022

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:

Penggunaan Type Data Record 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.