Untuk membuat tipe data buatan berdasarkan tipe data yang sudah ada
kita menggunakan reserved word "type" dan tanda sama dengan(=). Berikut ini adalah contoh kode
program yang menggunakan tipe data record untuk membuat tipe data buatan berdasarkan tipe data yang sudah ada.
Kode program di atas membuat tipe data baru dengan nama "recordku" yang berasal dari tipe data record yang memiliki beberapa anggota. Kemudian, tipe data tersebut digunakan dalam deklarasi "variabel r". Pembuatan tipe data memudahkan dan mempersingkat deklarasi tipe data record atau array dengan anggota yang sama. Karena itu, tipe data yang biasa dibuat biasanya berupa tipe bentukan seperti array, record, himpunan, enumerasi, dll.
Kalian bisa membuat tipe data baru menggunakan tipe lainnya. Selanjutnya, selamat belajar dan mencoba!!!
program coba;
Type recordku=record
angka:integer;
pecahan:real;
tulisan:string;
end;
uses crt;
var r:recordku;
begin
clrscr;
r.angka:=1;
r.pecahan:=2.5;
r.tulisan:='angka';
writeln(r.angka);
writeln(r.pecahan:1:1);
writeln(r.tulisan);
readln
end.
Kode program di atas membuat tipe data baru dengan nama "recordku" yang berasal dari tipe data record yang memiliki beberapa anggota. Kemudian, tipe data tersebut digunakan dalam deklarasi "variabel r". Pembuatan tipe data memudahkan dan mempersingkat deklarasi tipe data record atau array dengan anggota yang sama. Karena itu, tipe data yang biasa dibuat biasanya berupa tipe bentukan seperti array, record, himpunan, enumerasi, dll.
program coba;
uses crt;
Type recordku=record
angka:integer;
pecahan:real;
tulisan:string;
end;
var r:recordku;
a:array[1..10] of recordku;
begin
clrscr;
r.angka:=1;
r.pecahan:=2.5;
r.tulisan:='angka';
a[1].angka:=r.angka;
a[1].pecahan:=r.pecahan;
a[1].tulisan:=r.tulisan;
writeln(a[1].angka);
writeln(a[1].pecahan:1:1);
writeln(a[1].tulisan);
readln
end.
Kalian bisa membuat tipe data baru menggunakan tipe lainnya. Selanjutnya, selamat belajar dan mencoba!!!