Pemrograman Pascal

Pengertian Bahasa Pemrograman PASCAL

Pascal adalah salah satu bahasa pemrograman komputer yang umumnya digunakan sebagai pengantar untuk mulai belajar algoritma dan pemrograman. Pascal relatif mudah dipelajari karena perintah-perintahnya yang mirip dengan bahasa inggris sehari-hari seperti begin, end, write, dan read.

Pascal diambil dari nama ahli matematika prancis abad pertengahan, Blaise Pascal. Bahasa Pascal di kembangkan oleh Niklaus Wirth pada tahun 1970, dan populer digunakan pada era 1970 hingga awal 1990an.

Fitur Bahasa PASCAL

Pascal memiliki beberapa fitur yang membuatnya cocok untuk belajar pemrograman dan untuk membuat aplikasi komersil. Beberapa diantaranya adalah:

• Tipe data bawaan: Pascal memiliki tipe data standar yang umum terdapat dalam bahasa pemrograman komputer seperti Integer, Real, Character, dan Boolean.
• Tipe data bentukan: Pascal membolehkan kita untuk membuat tipe data bentukan yang didefenisikan sendiri.
• Memiliki beragam struktur data: Pascal menyediakan beberapa struktur data seperti Array, Record, File dan Set.
• Aturan tipe data yang ketat: Pascal membatasi penggunaan tipe data secara ketat. Kita hanya bisa menggunakan variabel untuk 1 tipe data saja dan variabel tersebut harus dideklarasikan terlebih dahulu.
• Mendukung struktural programming: Bahasa Pascal dirancang dengan konsep pemrograman terstruktur yang mendukung sub program melalui fungsi dan prosedur
• Sederhana dan expresif: Pascal banyak menggunakan perintah-perintah dalam bahasa inggris sederhana, sehingga mudah dipahami.
• Mendukung pemrograman objek: Walaupun tidak banyak dibahas, tetapi Pascal juga mendukung pemrograman berbasis objek, terutama pada compiler versi terakhir.

·         Contoh Program Function/Fungsi Sederhana

program fungsi;

uses wincrt;

function hitung (a, b : integer):integer;

         begin

         if a>b then hitung :=(a*b)+2

         else

         hitung :=(a+b)*2;

         end;

var a, b :integer;

begin

clrscr;

write ('Masukkan bilangan 1 :'); readln (a);       

write ('Masukkan bilangan 2 :'); readln (b);

write ('Bilangan terbesar :',hitung (a,b));

end.