Pascal

 Jika bicara bahasa pemrograman, maka Pascal adalah salah satunya yang sering digunakan oleh banyak programmer. Adapun bahasa pemrograman adalah instruksi atau perintah standar yang dipakai atau dimanfaatkan untuk memerintah komputer. Contoh program Pascal sederhana bisa dengan mudah Anda temukan karena ini termasuk bahasa tingkat tinggi.

Dikatakan demikian karena Pascal merupakan pemrograman yang memakai bahasa yang sudah bisa dipahami atau dimengerti oleh manusia. Bahasa pemrogramannya pun terstruktur, dan berikut ada penjelasan lebih lanjut mengenai program satu ini.

Versi aplikasi pascal yang kita gunakan : fpc-3.0.4.i386-win32 

Apa itu Pascal

Mudahnya, pascal ini merupakan salah satu bahasa pemrograman yang sering digunakan pada saat seseorang mempelajari algoritma dan juga pemrograman terutama di bidang akademis. Dalam kalimat yang lain, bisa dijelaskan bahwa Pascal ini adalah bahasa pemrograman yang cara menulisnya itu sangat dekat dengan cara menulis algoritma structure english.

Seperti yang sudah disebutkan, Pascal ini terstuktur dan juga tersusun atas blok-blok yang biasa dikenal sebagai subprogram. Blok-blok yang ukurannya kecil nantinya bisa dimanfaatkan untuk membuat blok yang ukurannya lebih besar. Pascal ini merupakan bahasa pemrograman yang diciptakan oleh seorang anggota IFIP atau International Federation of Information Processing sekitar tahun 1971 yang lalu.

Orang tersebut bernama Niklaus Wirth. Kata Pascal sendiri bukan diambil dari namanya, melainkan dari nama seorang matematikawan asal Prancil bernama Blaise Pascal. Nah, Blaise Pascal ini adalah orang yang menciptakan mesin penghitung pertama kali.

Bahasa pemrograman Pascal hingga saat ini masih menjadi bahasa pemrograman yang standar untuk OSN atau Olimpiade Sains Nasional, khususnya di bidang komputer. Bahkan bukan hanya OSN saja, kebanyakan jurusan komputer yang ada di Indonesia juga menggunakan bahasa ini ketika berada di tahun pertama bangku kuliah.

Pascal ini menerapkan konsep prosedur dan struktur programming yang bisa dikatakan baik. Makanya Pascal juga disebut-sebut sebagai pilihan yang pas untuk orang-orang yang ingin mempelajari konsep programming. Bahkan perintah yang ada dalam Pascal juga mirip dengan bahasa Inggris yang biasa digunakan dalam keseharian, misalnya read, write, end dan begin.

Sebagai bagian dari bahasa pemrograman, tentu Pascal ini juga mempunyai kelebihan dan kekurangan. Adapun kelebihannya ialah sebagai berikut.

• Pascal sederhana dan juga ekspresif serta mendekati bahasa manusia sehingga lebih mudah untuk dipahami serta dipelajari
• Pascal terstruktur karena mempunyai sintaks yang masih memungkinkan untuk memecah penulisan program menjadi fungsi yang kecil yang bahkan bisa dipakai secara berulang-ulang
• Strongly typed, yaitu programmer diharuskan untuk menentukan tipe data suatu variabel. Adapun variabel yang dimaksud tidak bisa dipakai untuk menyimpan tipe data yang formatnya selain format yang telah ditentukan
• User defined data typed yaitu programmer dimungkinkan untuk membuat tipe data yang lain yang diturunkan dari tipe data standar
• Pascal mempunyai tipe data standar seperti string, char, real, integer dan boolean yang umumnya memang tersedia di berbagai bahasa pemrograman

Sementara untuk kekurangan program yang sempat mencapai puncak kepopuleran tahun 1970 sampai dengan awal 1990 ini sebagai berikut.

• Pascal cenderung tidak fleksibel dan mempunyai banyak kekurangan yang diperlukan dalam membuat aplikasi yang besar
• Tidak mendukung pemrograman yang berorientasi terhadap objek
• Sintaks milik Pascal cenderung terlalu bertele-tele
• Versi Pascal yang awal dirasa kurang cocok untuk diterapkan di aplikasi bisnis karena dukungan databasenya terbatas

Contoh Program Pascal

 Aplikasi diskon

=============

Program diskon;                              
uses wincrt;
var
   belanja : real;                             

begin                                                 
   write('Jumlah Belanja  : Rp ');
   readln(belanja);
   if belanja <= 400000 then belanja := 0.99 * belanja;
   if belanja = 500000 then belanja := 0.98 * belanja;
   if belanja >= 500001 then belanja := 0.96 * belanja;                    
   write('Jumlah belanja yang harus dibayar adalah Rp ', belanja:0:0);
readln;
end.         

 

Aplikasi input nilai

===============

Program InputNilai;
Uses CRT;
var NIM : String[9];
    Nm  : String[25];
    nh  : Char;
    tgs, mid, fnl, tot : Real;
Begin
     ClrScr;
     Write('NIM   : '); Readln(NIM);
     Write('Nama  : '); Readln(Nm);
     Write('Tugas : '); Readln(tgs);
     Write('MID   : '); Readln(mid);
     Write('Final : '); Readln(fnl);
     tot := 0.2*tgs + 0.3*Mid + 0.5*fnl;
     If tot >= 80 Then nh := 'A' Else
     If tot >= 70 Then nh := 'B' Else
     If tot >= 51 Then nh := 'C' Else
     If tot >= 41 Then nh := 'D' Else
     nh := 'E';
     Clrscr;
     Writeln('                              DAFTAR NILAI  MAHASISWA');
     Writeln('        MATA KULIAH ALGORITMA DAN PEMPROGRAMMAN');
     Writeln('                               JURUSAN INFORMATIKA');
     Writeln;
     Write('NIM                 : ',NIM);
     Writeln('  Nama             : ',Nm);
     Writeln('Nilai Tugas      : ',tgs:3:2);
     Writeln('Nilai Mid Test   : ',mid:3:2);
     Writeln('Nilai final Test : ', fnl:3:2);
     Write('Total Nilai      : ',tot:3:2);
     Writeln('   Nilai Huruf : ',nh);
     Readln;
End.