Pemprograman Pascal | tutorial | contohnya programnya

Program dan Bahasa Pemrograman

Kalian tentu tidak asing lagi dengan program komputer, kan? Setiap hari tentu kalian

menggunakan program komputer atau disingkat program saja. Lalu apa definisi program?

Bagaimana cara kerja dan pembuatannya?

Menurut definisi,programkomputer adalah kumpulan instruksi yang digunakan untuk

mengatur komputer agar melakukan suatu tindakan tertentu.Jadi komputer tidak akan bisa apa-apa

jika tidak ada program di dalamnya. Sebuah komputer atau laptop secanggih apa pun

spesifikasinya tanpa program sistem operasi maka tidak ada gunanya. Demikian juga untuk lebih

optimal kemanfaatannya perlu dipasang berbagai program seperti pengolah kata, pengolah angka,

pengolah grafis, program video, musik hingga game. Semua program tersebut pada dasarnya

memberikan instruksi kepada komputer sedemikain rupa sehingga bisa melakukan berbagai

macam hal sesuai dengan fungsi program tersebut. Orang yang mengembangkan program disebut

dengan programmer.

Komputer bekerja dengan operasi-operasi biner, yaitu mengolah data-data berupa barisan

biner 0 dan 1 sehingga tidak mungkin ketika seorang programmer memerintahkan untuk menulis

pesan langsung dimengerti oleh komputer. Oleh karena itu harus ada suatu bahasa yang

penghubung agar komputer mengerti instruksi atau perintah yang diberikan.Bahasa penghubung

inilah yang disebut dengan bahasa pemrograman. Bahasa Pemrogramanadalah suatu instruksi

standar untuk memerintahkomputer.Untuk menjadi sebuah program maka kode-kode yang sudah

dituliskan dalam bahasa pemrograman diubah ke dalam bahasa mesin yang dimengerti oleh

komputer dengan menggunakan interpreter atau compiler. Proses perubahan ini disebut dengan

interprestasi atau kompilasi. Hasil kompilasi inilah yang menghasilkan program komputer.

Penjelasan lebih detail mengenai keduanya akan dibahas.

Mengenal Tools/Framework Pengembangan Program

Seperti yang telah disampaikan sebelumnya bahwa Pascal termasuk bahasa pemrogaman

tingkat tinggi sehingga dibutuhkan sebuah compiler atau tools pengembang yang berfungsi

menterjemahkan bahasa kedalam bahasa yang dimengerti komputer.

Beberapa compilerPascal diantaranya GNU Pascal, Free Pascal, Dev Pascal dan Turbo

Pascal, dan Delphi.Dari beberapa compiler tersebut, untuk pembelajaran buku ini menggunakan

FreePascal.FreePascal memiliki keunggulan yakni cocok digunakan untuk berbagai platform

Sistem Operasi diantanya: DOS,Linux, Windows, FreeBSD, PalmOs dan masih banyak yang lain

Menurut kedekatannya dengan mesin komputer, bahasa pemrogaman di bagi menjadi
beberapa tingkatan diantaranya:

1. Bahasa Mesin

Bahasa mesin merupakan rangkaian instruksi yang terdiri dari kode biner, contohnya

0001110011. Bahasa ini menempati tingkatan yang paling rendah karena bahasa ini bisa

langsung dieksekusi oleh processor, sehingga bahasa mesin sering kali digunakan untuk

kompilasi oleh compiler pada bahasa pemrograman lain, yang lebih tinggi tingkatnya.

2. Bahasa Tingkat Rendah

Bahasa tingkat rendah merupakan rangkaian instruksi menggunakan kode-kode singkat (kode mnemonic) contohnya bahasa Assembly.

3. Bahasa Tingkat Menengah

Bahasa tingkat menengah merupakan rangkaian instruksi gabungan antara bahasa manusia

dengan kode-kode simbolik, contohnya {,},?,<,>&&,$,dsb. Yang termasuk bahasa menengah yakni bahasa C.

4. Bahasa Tingkat Tinggi

Bahasa tingkat tinggi merupakan rangkaian instruksi yang menggunakan unsur kata-kata

manusia sehingga lebih mudah untuk dimengerti contohnya begin, end, if, for, while, and, ordsb. Untuk bahasa ini diperlukan compiler untuk mengompilasi ke dalam bahasa mesin

sehingga dimengerti komputer. Yang termasuk kategori ini adalah Pascal dan Basic

STRUKTUR BAHASA PEMROGAMAN PASCAL

Judul Program

Judul program digunakan untuk mengidentifikasikan nama program yang dibuat. Untuk

penulisan judul program sifatnya optional jadi boleh dicantumkan atau tidak, namun untuk

keperluan identifikasi lebih baik judul ada dan diberi nama sesuai dengan tujuan program. Nama

program diawali dengan kata Program, sebagai kata baku dalam Pascal, diikuti dengan nama

program atau identifier.

Aturan pemberian nama identifer, dalam hal ini termasuk judul program adalah sebagai berikut.

1. Nama identifier harus dimulai dengan karakter huruf alfabet a-z atau A-Z.

2. Setelah karakter pertama, dapat dilanjutkan dengan karakter afanumerik (angka maupun huruf)

dan underscore (_).

3. Dalam penulisan identifier tidak boleh menggunakan karakter-karakter berikut ini.

~ ! @ # $ % ^ & * ( ) + ` - = { } [ ] : " ; ' <> ? , . / |

4. Tidak boleh menuliskan identifier dengan nama yang sama pada kata kunci dari Pascal, seperti

and, array, begin, case, const, div, do, downto, else, end, file, for, forward, function,

goto, if, in, label, mod, nil, not, of, or, packed, procedure, program, record, repeat, set,

then, to, type, until, var, while, with

5. Jika ingin tetap digunakan, maka kata tersebut harus dirangkai dengan kata/karakter yang lain.

Misal program_if, begin1.

Berikut ini contoh pemberian nama Progam yang benar.

Program LuasLingkaran;

Program Luas_Lingkaran

Program Luas2;

Program L_uas;

Berikut ini contoh nama program yang salah

Program Luas Lingkaran;

Program Luas-Lingkaran;

Program Luas^Lingkaran.

Program 2Luas;

Di akhir nama program harus diikuti dengan tanda semicolon/titik koma (;).

Identifier juga digunakan untuk memberi nama variabel ,konstanta, sub program seperti

function dan prosedur, sehingga format penamaan harus sesuai dengan aturan di atas.

Deklarasi Program

Sebagaimana dalam algoritma, bagian deklarasi adalah bagian persiapan di mana semua

hal yang diperlukan oleh program pada bagian deskripsi didefinisikan di sini. Yang termasuk dari

bagain deklarasi adalah sebagai berikut.

1. Unit, yaitu fungsi-fungsi tambahan dari Pascal, cara memanggilnya adalah dengan

menggunakan kata kunci Uses.

Sebagai contoh pada program di atas adalah penggunaan Uses crt.Uses crt diperlukan

karena kode program menggunakan perintah clrscr untuk membersihkan layar. Perintah ini

disediakan oleh unit crt.

2. Konstanta, yaitu suatu nilai yang besarnya tetap (konstan) selama program dijalankan

3. Deklarasi Variabel, yaitu identifer atau nama-nama untuk menyimpan nilai beserta denan

tipe datanya.

4. Deklarasi Tipe data baru yang didefinisikan oleh programmer

5. Prosedur dan fungsi

VARIABEL, TIPE DATA, KONSTANTA, OPERATOR, DAN EKSPRESI

Variabel

Kalian masih ingat apakah arti variabel? Iya, variabel adalah suatu nama atau simbol untuk

menyimpan sebuah nilai. Atau lebih tepatnya variabel adalah sebuah nama yang diberikan oleh

programmer yang berfungsi sebagai tempat penyimpanan data, sehingga dapat dimanipulasi oleh

program. Seperti pada contoh pada source code di atas, Progam Biodata diperlukan variabel nama,

alamat dan umur. Pada program menghitung volume diperlukan variabel r,t, V yang mewakili jari-jari,

tinggi, dan volume tabung. Sedangkan pada Program UAN diperlukan variabel NilaiMat, NilaiIngg,

NilaiInd, rerata, dan stsLulus.

Variabel ini ditentukan sesuai dengan kebutuhan dari solusi permasalahan. Karena Volume

tabung adalah Volume = r2t, maka tentu kita membutuhkan variabel untuk mewakili Volume, jari-jari

dan tinggi, dan satu lagi adalah  sebagai konstanta. Jadi ada 3 variabel dan 1 konstanta.

Demikian juga dengan kelulusan, karena tergantung dari nilai ketiga mata pelajaran, maka

variabel-variabel yang dibentuk pun menyesuaikan.

Jenis nilai yang disimpan variabel tentu berbeda-beda sesuai dengan kebutuhan, ingat kembali

materi pada semester 1. Variabel namadan alamat tentu menyimpan nilai berupa susunan huruf, atau

yang dulu dikenalkan sebagai string (dalam Pascal disebut juga string), Volume, r, dan t menyimpan

nilai bilangan real, sedangkan variabel nilaiMat, nilaiInd menyimpan nilai bilangan bulat (mungkin juga

bilangan real, sesuai kebutuhan). Jenis-jenis data inilah yang disebut sebagai TIPE DATA. Oleh

karena itu dalam mendeklarasikan variabel harus didefinisikan juga tipe data yang akan digunakan.

Hal ini sekaligus digunakan program untuk menentukan besarnya memori sebagai tempat

penyimpanan variabel tersebut.

Tipe Data

Tipe data merupakan klasifikasi jenis data dari variabel atau object yang terdapat dalam

program computer. Jenis data yang digunakan dalam variabel merupakan bagian penting dalam

pengkodean pemrograman computer. Ketepatan pemilihan data pada variabel atau konstanta akan

sangat menentukan pemakain sumber daya komputer (terutama memori komputer). Sehingga dalam

pemilihan tipe data yang akan digunakan dalam variabel dan konstanta akan mempengaruhi efesiensi

dan kinerja dari program tersebut.

Secara garis besar tipe data dalam Pascal dibagi menjadi 3 kategori, yaitu tipe data sederhana

(tunggal), Tipe data pointer dan tipe data terstruktur (stuctured data). Masing-masing kategori dapat

dibai lagi menjadi beberapa jenis lagi seperti pada Gambar 2.1.

1. Tipe Data Sederhana

Tipe data sederhana merupakan tipe data paling dasar yang terdapat dalam pascal. Tipe data ini

mewakili satu objek yaitu hanya satu nilai yang dapat disimpan dalam tipe data ini sehingga

disebut juga tipe data tunggal. Tipe data sederhana dibagi menjadi dua yaitu tipe data standar dan

User Defined.

a. Standar, merupakan tipe data yang umum dijumpai dalam berbagai bahasa pemrograman.

Tipe data standar meliputi integer, real, character dan boolean.

1) Integer

Tipe data integer merupakan tipe data berupa bilangan bulat. Tipe data ini cocok untuk

variabel-variabel seperti: jumlah anak, bulan, tahun, dan sebagainya. Berat badan, tinggi,

suhu, panjang, lebar, nominal uang dapat juga dimasukkan dalam tipe data ini, meskipun

dapat juga dimasukkan ke dalam tipe data lain seperti bilangan real.

2) Real

Tipe data real merupakan tipe data yang berisi bilangan yang bisa memuat angka di

belakang koma. Berbeda dengan integer yang hanya menyimpan bilangan bulat. Dalam

tipe data real nilai yang tersimpan dapat berupa bilangan desimal. Untuk mengidentifikasi

variabel dengan tipe data real, dapat dilihat dari operasi yang dibutuhkan dalam proses

perhitungan. Jika variabel tersebut diperoleh dari operasi dari bilngan lain bertipe data real

maka tipe datanya juga real. Sebagai contoh Luas lingkaran, volume tabung dan kerucut

termasuk bertipe data real karena melibatkan perkalian dengan Phi3.14 sehingga

hasilnya pasti ada angka di belakang koma. Selain itu adanya operasi bagi (‘/’) juga

menghasilkan bilangan real. Sebagai contoh Luas segitiga = (alas*tinggi)/2 termasuk

mempunyai tipe data real, demikian juga rata-rata, suhu konversi dalam Reamur dan

Farenheit, karena melibatkan operasi pembagian.

Selain berdasarkan operasi, variabel dengan tipe data bilangan real tergantung kebutuhan.

Misalkan menghitung tinggi badan. Kita bisa melakukan pembulatan tanpa koma sehingga

tinggi badan bisa kita masukkan tipe data integer. Jika ingin lebih teliti, menggunakan

koma, bisa menggunakan tipe data real.

3) Character

Tipe data character merupakan tipe data yang menyimpan karakter yang berupa angka

maupun huruf. Tipe data character dalam pascal meliputi char dan string. Tipe data char

hanya meyimpan 1 karakter saja. Variabel yang cocok untuk tipe data karakter adalah

variabel yang nilainya hanya terdiri dari satu karakter saja, contoh: JenisKelamin (nilainya

bisa diwakili ‘L’ untuk laki-laki atau ‘P’ untuk perempuan), Pilihan yang bernilai iya dan tidak

(bisa diwakili dengan ‘Y’ atau ‘N’), dan lain-lain.

Tipe data string merupakan susunan dari karakter-karakter dengan batas maksimum 255

karakter, tipe data string digunakan untuk menyimpan data text, misal nama, alamat dan

sebagainya. Penulisan deklarasi variaebl dengan tipe data characterdan stringadalah

4) Boolean

Tipe data Boolean merupakan tipe data yang hanya mempunyai dua nilai yaitu

trueataufalse. Tipe data ini biasanya digunakan variabel yang hanya mempunyai nilai

benar atau salah saja. Misalkan statusLulus, bisa bernilai True atau False; remidi, bisa

bernilai true atau false, Menikah, bisa bernilai true atau false, pdan sebagainya

STRUKTUR PERCABANGAN

Struktur percabangan dengan satu kondisi pada Bahasa Pascal mempunyai sintaks

sebagai berikut.

if (kondisi) then

Pernyataan;

Jika pernyataan lebih dari satu maka dituliskan

if (kondisi) then

Begin

Pernyataan1;

Pernyataan2;

dst;

end;

Jika pernyataan
lebih dari satu untuk tiap syarat, maka dapat ditambahkan begin dan end seperti berikut.

If (syarat1) then

begin

Pernyataan1;

Pernyataan2;

end

else

begin

Pernyataan3;

Pernyataan4;

End;

Berikut ini contoh contoh Bahasa Program Pascal

program menyapa;

uses crt;

begin

   clrscr;

   WriteLn('ini adalah program untuk');

   WriteLn('hai budi apa kabarmu hari ');

   ReadLn;

end.

program ujianpilganda;

uses crt;

var a,b,c:real;

begin

  clrscr;

  Write('masukkan jumlah soal=');

  readln(a);

  write('masukkan jawaban benar=');

  ReadLn(b);

  c:=(b/a)*100;

  Write('Hasil Nilai Ujian=',c);

  ReadLn;

end.

program uji1;

uses crt;

begin

  clrscr;

  write('Perkenalkan Biodata Saya');

  WriteLn;

  Write('__________________________');

  WriteLn;

  WriteLn;

  write('Nama saya adalah :');

  write('Irfan Abdullah');

  WriteLn;

  write('Alamat saya :');

  write('Bulukumba');WriteLn();

  write('Sekolah :');write('SMK Neg 10 Bulukmba');

  

end.

program hobiku;

uses crt;

begin

     clrscr;

     Write('hobiku banyak loh:');

     Write('1 membaca');

     ReadLn;

end.

  

Program Perkalian;

uses crt ;

var

bil1, bil2, hasil : real; 

begin  

      clrscr;

      Write('Silahkan Masukan Bilangan Pertama :');  

      Readln(bil1); 

      Write('Silahkan Masukan Bilangan Kedua:');  

      Readln(bil2);  

      hasil := bil1*bil2;

      Writeln('Hasil perkalian =',hasil); 

      Readln; 

end.

Program Pengurangan;

uses crt ;

var

bil1, bil2, hasil : real; 

begin  

clrscr;

 WriteLn('Program Pengurangan');

 Write('Silahkan Masukan Bilangan Pertama :');  

 Readln(bil1); 

 Write('Silahkan Masukan Bilangan Kedua:');  

  Readln(bil2);  

hasil := bil1-bil2;

 Writeln('Hasil pengurangan =',hasil); 

 Readln; 

end.

Program Menghitungdiskon; 

Uses crt;

var 

harga,diskon,harga_akhir: real; 

begin

    clrscr;

    write('masukan harga barang=');

    readln(harga);

    write('masukan prosentase diskon barang, skala 1-100 =');

    readln(diskon);

    harga_akhir:=harga-(harga*diskon/100);

    writeln('harga barang setelah didiskon adalah =',harga_akhir);

    readln;

end.

Program  KonversiPanjang;

Uses crt;

Var m,cm,mm:Real;

Begin 

     Clrscr; 

     Write('Masukan nilai  panjang dalam  Centimeter=');

     Readln(cm);

     

     m:=cm/100;

     mm:=cm*10;

     

     WriteLn('konversi nilai dalam meter=',m);

     writeln('konversi nilai dalam mili meter=',mm);

     ReadLn;

end.

program tugas;

uses crt;

var

tugas, akhir, hasil : real ;

begin

      clrscr;

      write('Masukkan Nilai Tugas : '); 

      readln(tugas);

      write('Masukkan Nilai Akhir : ');

      readln(akhir);

      hasil:=(tugas+akhir)/2;

      if (hasil>=akhir) then

          begin

          writeln('Nilai Ujian : ',hasil,' LULUS');

          end

      else

          begin

          writeln('Nilai Ujian : ',hasil,' TIDAK LULUS');

          end

          

end.

program Irit_Boros;

uses crt;

var

saku, peng, hasil : Integer ;

begin

      clrscr;

      write('Jumlah uang saku Anda per minggu : '); 

      readln(saku);

      write('Pengeluaran Anda per minggu : ');

      readln(peng);

      hasil:=saku-peng;

      if (hasil>peng) then

          begin

          writeln('sisa uang saku Anda per minggunya adalah : ',hasil,' artinya Anda adalah orang yang irit');

          end

      else

          begin

          writeln('sisa uang saku Anda per minggunya adalah : ',hasil,' artinya Anda adalah orang yang boros');

          end

         

end.

Program Gabungan;

uses crt ;

var

bil1, bil2, hasil : real; 

begin  

      clrscr;

      WriteLn('Program Perkalian');

      Write('Silahkan Masukan Bilangan Pertama :');  

      Readln(bil1); 

      Write('Silahkan Masukan Bilangan Kedua:');  

      Readln(bil2);  

      hasil := bil1*bil2;

      Writeln('Hasil perkalian =',hasil); 

      Readln; 

      

      

      

      

      WriteLn('Program Pertambahan');

      Write('Silahkan Masukan Bilangan Pertama :');  

      Readln (bil1); 

      Write('Silahkan Masukan Bilangan Kedua:');  

      Readln(bil2);  

      hasil := bil1+bil2;

      Writeln('Hasil Pertambahan =',hasil); 

      Readln;

   

end.

Program DiskonBaju; 

Uses crt; 

var hargaNormal, ProsenDiskon:integer;      

 BesarDiskon, hargaAkhir: real; 

Begin     

   Clrscr; 

write('Masukkan total harga pembelian: '); 

readln(harganormal); 

ProsenDiskon:=20; 

if (harganormal>=200000) then

ProsenDiskon:=25;

BesarDiskon:=(ProsenDiskon/100)*harganormal;

Hargaakhir:=harganormal-BesarDiskon;

 writeln('Total harga yang harus dibayar adalah : ', hargaakhir:2:2); 

end.

Program dataSiswa; 

uses Crt ;

Var 

NIS : String; 

Nama_siswa : string; 

Alamat : char; 

Goldar : string; 

Gaji_ortu : integer; 

Begin

     clrscr();

     Write('Masukkan Nomor induk siswa : ');

     Readln(nis);  

     Write('Masukkan nama Anda : ');

     Readln(nama_siswa);  

     Write('Masukkan Alamat Rumah :'); 

     Readln(alamat); 

     Write('Masukkan Golongan Darah Anda :'); 

     Readln(goldar); 

     Write('Masukkan gaji orang tua anda :');

     Readln(gaji_ortu); 

     WriteLn();

     WriteLn();

     WriteLn();

     Writeln('NIS :',nis);

     Writeln('Nama : ',Nama_siswa);

     Writeln('Alamat : ',Alamat);

     Writeln('Golongan Darah : ',Goldar);

     Writeln('Gaji Orang Tua : ',Gaji_ortu);

     Readln;  

     

End.

Anda dapat mendownload Pascal Untuk PC/Komputer atau versi Android

Berbagi :