PASCAL
adalah bahasa pemrograman tingkat tinggi (high level language) yang
orientasinya pada segala tujuan, dirancang oleh Professor Niklaus Wirth dari
Technical University di Zurich, Switzerland. Nama PASCAL diambil sebagai
penghargaan terhadap Blaise Pascal, ahli matematik dan philosophi yang terkenal
di abad 17 dari Perancis.
Kelebihan
Bahasa Pemrograman PASCAL dibanding bahasa pemrograman lain
:
1. Tipe Data Standar, tipe-tipe data standar yang telah tersedia pada
kebanyakan bahasa pemrograman. Pascal memiliki tipe data
standar antara lain : Boolean, Integer, Real,
Char, String.
2.
User
defined Data Types,
programmer dapat membuat tipe data lain yang diturunkan dari tipe data standar.
3.
Strongly-typed, programmer harus menentukan tipe data dari suatu
variabel, dan variabel tersebut tidak dapat dipergunakan untuk menyimpan tipe
data selain dari format yang ditentukan.
4.
Terstruktur, memiliki sintaks yang memungkinkan penulisan program
dipecah menjadi fungsi-fungsi kecil (procedure dan function) yang
dapat dipergunakan berulang-ulang.
5.
Sederhana
dan Ekspresif, memiliki
struktur yang sederhana dan sangat mendekati bahasa manusia (bahasa Inggris)
sehingga mudah dipelajari dan dipahami.
Struktur
Program Pascal
1. JUDUL
PROGRAM
2. BLOK
PROGRAM
a. Bagian
Deklarasi
i.
Deklarasi Label
ii.
Definisi Konstanta
iii.
Definisi Tipe
iv.
Deklarasi Variabel
v.
Deklarasi Prosedur
vi.
Deklarasi Fungsi
b. Bagian
Pernyataan
PROGRAM
PASCAL YANG PALING SEDERHANA
Suatu program
Pascal yang paling sederhana adalah program yang hanya terdiri dari sebuah
bagian pernyataan saja. Bagian Pernyataan (Statement Part) merupakan bagian
yang terakhir dari suatu blok. Bagian ini diawali dengan kata cadangan
(Reserved Word) BEGIN dan diakhiri dengan kata cadangan END.
Contoh :
Begin
Statemen;
End.
PENULISAN PROGRAM PASCAL
Program
Pascal tidak mengenal aturan penulisan di kolom tertentu, jadi boleh ditulis
mulai kolom ke berapapun. Penulisan statement-statement pada contoh program
yang menjorok masuk beberapa kolom tidak mempunyai pengaruh di proses, hanya
dimaksudkan supaya mempermudah pembacaan program, sehingga akan lebih terlihat bagian-bagiannya.
A.
Statement
WRITE, merupakan perintah untuk menampilkan hasil tanpa
ganti baris.
CONTOH (1) :
Begin
Write(‘Saya Pascal’);
Write(‘........’);
End.
Bila Program
dijalankan, maka akan ditampilkan sebagai berikut :
Saya Pascal .......
B.
Statement
WRITELN, merupakan perintah untuk menampilkan hasil baris per
baris (akan ganti baris selanjutnya).
CONTOH (2) :
Begin
Writeln(‘Saya Pascal’);
Writeln(‘.......’);
End.
Bila Program
dijalankan, maka akan ditampilkan sebagai berikut :
Saya Pascal
........
BAGIAN DEKLARASI
Bagian deklarasi
digunakan bila di dalam program Anda menggunakan pengenal (identifier).
Identifier dapat berupa label, konstanta, tipe, variabel, prosedur dan fungsi.
Kalau suatu program menggunakan identifier, Pascal menuntut supaya identifier
tersebut dikenalkan terlebih dahulu sebelum digunakan, yaitu dideklarasikan
terlebih dahulu pada bagian ini.
A.
Deklarasi
Konstanta.
Bila Anda ingin menggunakan
identifier yang berisi nilai-nilai konstanta, maka harus didefinisikan terlebih
dahulu pada bagian ini. Definisi konstanta diawali dengan kata cadangan CONST
diikuti oleh kumpulan identifier yang diberi suatu nilai konstanta.
CONTOH
(3) :
Program Contoh_Konstanta;
Const
Nama
= ‘Rifqi Muhammad Aziz’
Begin
Writeln(‘Namaku
Adalah=’,Nama);
End.
Bila Program
dijalankan, maka akan ditampilkan sebagai berikut :
Namaku
Adalah Rifqi Muhammad Aziz
B.
Deklarasi
Variabel.
Variabel adalah identifier yang
berisi data yang dapat berubah-ubah nilainya di dalam program. Kata cadangan
VAR digunakan sebagai judul di dalam bagian deklarasi variabel yang diikuti
oleh satu atau lebih identifier yang dipisahkan koma, diikuti dengan titik dua
dan tipe dari datanya serta diakhiri dengan titik koma.
CONTOH
(4) :
Var
Panjang,
Lebar, Tinggi : real;
Luas : integer;
Begin
Panjang
:= 2;
Lebar
:= 3;
Tinggi
:= 4;
Luas
:= Panjang*Lebar*Tinggi;
Write(‘Jadi
Volume Balok Adalah=’,Luas);
End.
Bila Program
dijalankan, maka akan ditampilkan sebagai berikut :
Jadi Volume
Balok Adalah=24
C.
Deklarasi
Tipe Data.
Macam-macam tipe data :
1. Tipe
data sederhana (simple type data)
a. Tipe
data standar (standard data type)
i.
Integer
ii.
Real
iii.
Char
iv.
String
v.
Boolean
b. Tipe
data didefinisikan pemakai (user defined data type)
i.
Enumerated atau scalar type
ii.
Subrange type
2. Tipe
data terstruktur (structured type data)
a. Array
b. Record
c. File
d. Set
3. Tipe
data penunjuk (pointer type data)
Kata cadangan TYPE digunakan sebagai judul deklarasi
tipe dan diikuti oleh satu atau lebih definisi tipe yang dipisahkan dengan
titik koma.
CONTOH
(5) :
Type
Pecahan
= real;
Logika
= boolean;
Bulat
= integer;
Huruf
= string[25];
Begin
End.
D.
Deklarasi
Label.
Kalau program Anda menggunakan
statement GOTO untuk meloncat ke suatu statement yang tertentu, makan
dibutuhkan suatu label pada statement yang dituju dan label tersebut harus
dideklarasikan terlebih dahulu pada bagian deklarasi. Mendeklarasikan label
diawali dengan kata cadangan LABEL diikuti oleh kumpulan identifier label
dengan dipisahkan oleh koma dan diakhiri dengan titik koma.
CONTOH
(6) :
Program Contoh_Label;
Label
Next,
Exit;
Begin
Writeln(‘Bahasa);
Goto
Next;
Writeln(‘BASIC’);
Next :
Writeln(‘PASCAL);
Goto
Exit;
Writeln(‘FORTRAN’);
Exit :
End.
Bila Program
dijalankan, maka akan ditampilkan sebagai berikut :
Bahasa
PASCAL
JENIS-JENIS PERULANGAN
A.
FOR
DO Menaik
Nilai_awal TO Nilai_akhir DO Pernyataan
CONTOH
(7) :
Begin
For
Z = 1 to 5 do
Writeln(‘SMK
Negeri 1 Adiwerna’);
Endfor
End.
Bila Program
dijalankan, maka akan ditampilkan sebagai berikut :
SMK Negeri 1 Adiwerna
SMK Negeri 1 Adiwerna
SMK Negeri 1 Adiwerna
SMK
Negeri 1 Adiwerna
SMK Negeri 1 Adiwerna
B.
FOR
DO Menurun
Nilai_awal DOWN TO Nilai_akhir DO Pernyataan
CONTOH
(7) :
Begin
For
Z = 5 down to 1 do
Writeln(‘SMK
Negeri 1 Adiwerna’);
Endfor
End.
Bila Program
dijalankan, maka akan ditampilkan sebagai berikut :
SMK Negeri 1 Adiwerna
C.
WHILE
– DO
WHILE
<kondisi) DO
Aksi 1
Aksi 2
ENDWHILE
CONTOH
(8) :
Begin
K
< 1
WHILE
K < 5 DO
Write(‘Halo’);
K < K+1
ENDWHILE
End.
Bila Program
dijalankan, maka akan ditampilkan sebagai berikut :
Halo
Halo
Halo
Halo
Halo
D.
REPEAT
– UNTIL
REPEAT
Aksi 1
Aksi 2
UNTIL
<kondisi>
CONTOH
(9) :
Begin
K
< 1
REPEAT
Write(‘Welcome’);
K < K+1
UNTIL
K > 5
End.
Bila Program dijalankan,
maka akan ditampilkan sebagai berikut :
Welcome
Welcome
Welcome
Welcome
Welcome
GOTOXY
Gotoxy
merupakan perintah yang digunakan untuk meletakan posisi kursor di layar yang
diatur dengan posisi XPOS dan YPOS
*Layar monitor terdiri dari 80 Kolom /
Karakter dari 1 s/d 80 kolom & 25 Baris dari 1 s/d 25.
GOTOXY(Kolom,
Baris);
CONTOH (10) :
Gotoxy(10,15);
writeln(‘Bahasa Pascal’);
Bila Program
dijalankan, maka akan ditampilkan sebagai berikut :
Bahasa Pascal
|
*Tulisan “Bahasa Pascal” terletak pada
kolom ke 10 dan baris ke 15
READ & READLN
READ
& READLN digunakan untuk memasukan data dengan cara mengetikan melalui
keyboard
READ :
Memasukan data dengan baris yang sama
READLN :
Memasukan data baris per baris
PENYELEKSI KONDISI
A.
Pernyataan
IF
Struktur
IF dapat berupa IF – THEN atau IF – THEN – ELSE, dengan bentuk umum IF ungkapan
THEN pernyataan.
Ungkapan
dalah kondisi yang akan diseleksi oleh pernyataan IF. Bila kondisi yang
diseleksi terpenuhi, maka pernyataan yang mengikuti THEN akan diproses.
Sebaliknya, bila kondisi tidak terpenuhi, maka yang akan diproses adalah
pernyataan berikutnya.
CONTOH (11) :
Var
Nilai
: real;
Ket
: string[12];
Begin
Ket:=’Tidak
Lulus’;
Write(‘Nilai
Ujian=’);
Readln(‘Nilai’);
IF
Nilai >=70 THEN ket:=’Lulus’
Writeln(‘Keterangan=’,Ket);
End.
Bila Program
dijalankan, maka akan ditampilkan sebagai berikut :
Nilai
Ujian = ....
Keterangan
= (Lulus atau Tidak Lulus)
*NB : Jika Nilai lebih dari 70, maka keterangan =
Lulus, tetapi jika kondisi belum terpenuhi atau nilai kurang dari 70, maka
Keterangan = Tidak Lulus.
B.
Pernyataan
CASE
Struktur
CASE dapat berupa CASE – OF atau CASE – OF...ELSE. Mempunyai suatu ungkapan
logika yang disebut dengan selektor dan sejumlah pernyataan yang diawali dengan
suatu label permasalahan yang mempunyai tipe sama dengan selektor.
CASE
ungkapan OF
Daftar CASE-label1 = pernyataan 1;
Daftar CASE-label2 = pernyataan 2;
Daftar CASE-label n = pernyataan n;
CONTOH (12) :
Var
Nilai
: char;
Begin
Writeln(‘Nilai
Huruf Yang Didapat=’);
Readln(Nilai);
CASE
Nilai OF
‘A’
: writeln(‘Sangat Baik’);
‘B’
: writeln(‘Baik);
‘C’
: writeln(‘Cukup);
‘D’
: writeln(‘Kurang’);
‘E’
: writeln (‘Gagal’);
End;
End.
Bila Program
dijalankan, maka akan ditampilkan sebagai berikut :
A
: Sangat Baik
B
: Baik
C
: Cukup
D
: Kurang
E
: Gagal
*NB : Jika Anda memasukan (input) salah
satu pilihan huruf antara A,B,C,D,E,F, maka akan keluar (output) keterangan
sesuai dengan pilihan huruf.
Hi. I’m Designer of Blog Magic. I’m CEO/Founder of ThemeXpose. I’m Creative Art Director, Web Designer, UI/UX Designer, Interaction Designer, Industrial Designer, Web Developer, Business Enthusiast, StartUp Enthusiast, Speaker, Writer and Photographer. Inspired to make things looks better.
0 komentar:
Posting Komentar