KONSEP DASAR PEMROGRAMAN PASCAL-Bag(2)

1.3 Deklarasi
Bagian deklarasi digunakan bila didalam program menggunakan pengenal (identifier) yang dapat berupa label, konstanta, tipe, variable, prosedur dan fungsi.

1.3.1 Deklarasi Konstanta
Definisi konstanta diawali dengan kata cadangan Const diikuti oleh kumpulan identifier yang diberi suatu nilai konstanta. Data konstanta nilainya sudah ditentukan dan pasti, tidak dapat dirubah didalam program.

Contoh :

Program contoh_konstanta;
Const
Potongan = 0.2 ;
Gaji = 25000 ;
Namaperusahaan = ‘PT ABC’ ;
Begin
Writeln ( ‘Potongan =’, Potongan ) ;
Writeln ( ‘Gaji =’, Gaji ) ;
Writeln ( ‘Nama =’, Namaperusahaan) ;
End .

1.3.2 Deklarasi Variabel
Variabel adalah identifier yang berisi data yang dapat diubah-ubah nilainya didalam program. Menggunakan kata cadangan Var sebagai judul didalam bagian deklarasi variable dan diikuti oleh satu atau lebih identifier yang dipisahkan koma, diikuti dengan titik dua dan tipe dari datanya diakhiri dengan titik koma.

Contoh :

Var
Total, Gaji, Tunjangan : real ;
Jumlahanak : integer ;
Keterangan : string [25] ;
Begin
Gaji : = 500000 ;
Jumlahanak : = 3 ;
Tunjangan : = 0.25 * Gaji + Jumlahanak * 30000 ;
Total : = Gaji + Tunjangan ;
Keterangan : = ‘Karyawan Teladan’ ;
Writeln ( ‘ Gaji bulanan = Rp. ‘ , Gaji ) ;
Writeln ( ‘ Tunjangan = Rp. ‘ , Tunjangan ) ;
Writeln ( ‘ Total gaji = Rp. ‘ , Total ) ;
Writeln ( ‘ Keterangan = Rp. ‘ , Keterangan ) ;
End .

1.3.3 Deklarasi Tipe
Pascal menyediakan beberapa macam tipe data, yaitu :
1. tipe data sederhana, terdiri dari :
a. tipe data standar : integer, real, char, string, Boolean.
b. Tipe data didefinisikan pemakai : enumerated atau scalar, subrange
2. Tipe data terstruktur : array, record, file, set
3. Tipe data penunjuk
Contoh :

Type
Pecahan = real ;
Bulat = integer ;
Huruf = string [25] ;
Begin
……..
……..
……..
End .

1.3.4 Deklarasi Label
Jika program menggunakan statement Goto untuk meloncat ke suatu statement yang
tertentu, maka dibutuhkan suatu label pada statement yang dituju dan label tersebut harus
di deklarasikan terlebih dahulu pada bagian deklarasi. Menggunakan kata cadangan
Label diikuti oleh kumpulan identifier label dengan dipisahkan oleh koma dan diakhiri
dengan titik koma.

Contoh :

Label

Output : Bahasa
Pascal
100, selesai ;
Begin
Writeln ( ‘Bahasa’ ) ;
Goto 100 ;
Writeln ( ‘Cobol’ ) ;
100 :
Writeln ( ‘Pascal’ ) ;
Goto selesai ;
Writeln ( ‘Fortran’ ) ;
Selesai :
End .

1.3.5 Deklarasi Prosedur
Prosedur merupakan bagian yang terpisah dari program dan dapat diaktifkan dimanapun didalam program. Prosedur dibuat sendiri bilamana program akan dibagi-bagi menjadi beberapa blok-blok modul. Prosedur dibuat didalam program dengan cara mendeklarasikannya dibagian deklarasi prosedur. Menggunakan kata cadangan
Procedure.

Contoh :

Procedure tambah ( x, y : integer ; var hasil : integer ) ;
Begin
Hasil : = x + y ;
End ;

Output :
2 + 3 = 5
{program utama}
var
z : integer ;
Begin
Tambah ( 2, 3, z ) ;
Writeln ( ‘ 2 + 3 = ‘, z );
End .

1.3.6 Deklarasi Fungsi
Fungsi juga merupakan bagian program yang terpisah mirip dengan prosedur, tetapi ada
beberapa perbedaannya. Kata cadangan yang digunakan Function.

Contoh :

Function Tambah ( x, y : integer ) : integer ;
Begin
Tambah : = x + y ;
End ;
{program utama}
Begin
Writeln ( ‘ 2 + 3 = ‘ , Tambah ( 2, 3)) ;
End .

1.4 Unit
Suatu unit adalah kumpulan dari konstanta, tipe-tipe data, variable, prosedur dan fungsi-fungsi. Tiap-tiap unit tampak seperti suatu program Pascal yang terpisah. Unit standar sudah merupakan kode mesin (sudah dikompilasi), bukan kode sumber Pascal lagi dan sudah diletakkan di memori pada waktu menggunakan pascal. Untuk menggunakan suatu unit, harus diletakkan suatu anak kalimat Uses diawal blok program, diikuti oleh daftar nama unit yang digunakan.

1.4.1 Unit System
Sebenarnya adalah pustaka dari runtime Turbo Pascal yang mendukung semua proses yang dibutuhkan pada waktu runtime. Unit system berisi semua prosedur dan fungsi standar turbo pascal. Unit system ini akan secara otomatis digunakan didalam program, sehingga boleh tidak disebutkan didalam anak kalimat Uses.

1.4.2 Unit Crt
Digunakan untuk memanipulasi layer teks ( windowing, peletakkan cursor dilayar, color untuk teks, kode extanded keyboard dan lainnya). Unit standar crt hanya dapat digunakan oleh program yang digunakan dikomputer IBM PC, IBM AT, IBM PS/2 atau yang kompatibel dengannya.

Contoh :

Uses crt ;
Begin
Clrscr ;
Writeln ( ‘Hallo’ ) ;
Writeln ( ‘——-‘ ) ;
End .

Prosedur standar yang menggunakan unit crt adalah :

AssignCrt HighVideo Sound
ClrEol InsLine TextBackground
ClrScr LowVideo TextColor
Delay NormVideo TextMode
DelLine NoSound Window
GotoXY

Fungsi standar yang menggunakan unit Crt adalah :

KeyPressed
ReadKey
WhereX
WhereY