Berlatih Membuat Program Pascal Bagian 6

Kali ini kita akan berlatih membuat tipe data scalar yang dapat anda buat sendiri. Di pemrograman pascal, selain tipe data standar yang sudah kita pelajari seperti String, Integer dan lainnya, sebenarnya masih banyak tipe data yang lain. Tipe data yang akan kita pelajari pada bagian ini adalah tipe data scalar yang dapat didefinisikan sendiri oleh programmer.

Untuk mendeklarasikan tipe data anda sendiri, anda dapat menuliskannya dibagian type diatas deklarasi variabel. Contohnya seperti ini:
Type
angka = (nol,satu,dua,tiga,empat,lima,enam,tuju,delapan,sembilan);
hari    = (senin,selasa,rabu,kamis,jumat,sabtu,ahad);
var
nama:String[15];

Langsung saja, implementasi programnya seperti berikut:
program latih6;

uses crt;

type
bulan = (januari,februari,maret,april,mei,juni,juli,agustus,september,oktober,nopember,desember);
hari = (minggu,senin,selasa,rabu,kamis,jumat,sabtu);

var
ujian : bulan;
bab,hariprak : hari;
BEGIN
clrscr;
bab:=senin;
writeln(ord(bab));
hariprak:=succ(bab);
writeln(ord(hariprak));
ujian:=agustus;
writeln(ord(ujian));
ujian:=pred(ujian);
writeln(ord(ujian));
writeln(ord(succ(ujian)));
readln;
END.

Maka hasilnya dapat dilihat sebagai berikut:
Berlatih Membuat Program Pascal Bagian 6
Hasil .exe dari kode diatas dapat anda unduh disini

Posting Komentar