Bab II Algoritma dan logika

Bab II Algoritma dan logika

Mengenal bahasa Pascal By : Teguh Cahyono,ST,M.Kom

Mengenal PASCAL 



Standart pascal adalah bahasa pascal yang didefinisikan oleh K.Jensen dan Niklaus Wirth. Standart di Amerika didefinisikan oleh kerjasama antara ANSI (American National Standards Institute -) dengan IEEE ( Intsitute Electrical and Engenering ).

By : Teguh Cahyono,ST,M.Kom

Struktur Program Pascal 1. 2.

Judul. Blok Program. a. Bagian Deklarasi. - Deklarasi Label. - Deklarasi Konstanta. - Deklarasi Tipe. - Deklarasi Variabel. - Deklarasi Prosedure. - Deklarasi Fungsi. b. Bagian Pernyataan. By : Teguh Cahyono,ST,M.Kom

Judul Program Bagian Deklarasi

Bagian Pernyataan

Program Pascal yg Paling Sederhana 

Merupakan program yang hanya terdiri dari sebuah bagian pernyataan saja. Bagian pernyataan ( Statement Part ) merupakan bagian terakhir dari suatu blok. Bagian ini diawali dengan kata cadangan ( Reserved Word ) begin dan diakhiri dengan kata cadangan End. Begin end.

Bentuk Umum = Begin Statement End.


Program Pascal yg Paling Sederhana (1) Contoh :

Begin Writeln ( ‘ Saya Pascal ‘) ; End.

Out Put : Saya Pascal Statement writeln digunakan untuk menampilkan hasil perbaris

Begin Writeln ( “ Saya Pascal ‘) ; Writeln (‘-------------------’); End.

Out Put : Saya Pascal -----------------Yang perlu diperhatikan adalah setiap statement perbaris diakhiri dengan tanda ( ; ) By : Teguh Cahyono,ST,M.Kom

Mencetak Hasil Ke Printer. 

Contoh.



Penulisan Program Pascal. Program pascal tidak mengenal aturan penulisan di kolom tertentu, jadi boleh di kolom manapun.

Begin Writeln (Lst, “ Saya Pascal ‘) ; Writeln (Lst ‘-------------------’); End. Out Put : Saya Pascal ------------------

Begin Writeln (Lst, “ Saya Pascal ‘) ; Writeln (Lst ‘-------------------’); End.

Begin Writeln (Lst, “ Saya Pascal ‘) ; Writeln (Lst ‘-------------------’); End. By : Teguh Cahyono,ST,M.Kom

Judul Program Di Turbo Pascal judul program sifatnya optional dan tidak signifikan didalam program. Contoh : Program Contoh; Begin Writeln (Lst, “ Saya Pascal ‘) ; Writeln (Lst ‘-------------------’); End.

Contoh Penulisan judul Program yang Benar Program gaji(Input,Output); Program Laporan(layar,cakram,printer,Plotter);


Bagian Deklarasi

Bagian deklarasi digunakan bila didalam 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. By : Teguh Cahyono,ST,M.Kom

a. Bagian Deklarasi Konstanta Bila ingin menggunakan indentifier yang berisi nilai-nilai konstatnta maka harus didefinisikan terlebih dahulu pada bagian ini. Definisi konstanta diawali dengan kata cadangan Const diikuti oleh kumpulan identifier yang diberi suatu nilai konstanta.


Contoh1 Deklarasi Konstanta. Program Contoh_Konstanta(layar); Const Potongan := 0.2; gaji := 25000; Perusahaan := ‘PT OJO LALI’ begin Writeln(‘Potongan=‘,potongan); Writeln(‘Gaji =‘,gaji); Writeln(‘Perusahaan=‘,Perusahaan); End.

Output : Potongan = 2.0000000000E-o1 Gaji = 25000 Perusahaan = PT OJO LALI By : Teguh Cahyono,ST,M.Kom

Contoh2 Deklarasi Konstatnta Program Contoh_Konstanta_Terdefinisi(Layar); Begin Writeln(‘Nilai Logika benar =‘,True); Writeln(‘Nilai Logika salah =‘,False); Writeln(‘Nilai Maxint=‘,Maxint); Writeln(‘Nilai Maxlongint=‘,Maxlongint); end. OutPut :

Nilai Logika Benar

= True

Nilai Logika Salah

= False

Nilai Maxint

= 32767.

Nilai MaxLongint

= 2147483647 By : Teguh Cahyono,ST,M.Kom

Deklarasi Variabel 

Jika konstanta merupakan identifier berisi data konstanta yang nilainya sudah ditentukan dengan pasti, tidak dapat dirubah didalam program, maka variabel adalah identifier yang berisi data yang dapat berubah-ubah nilainya didalam program Contoh :

Var Total,gaji,tunjangan

: Real;

Menikah

: Boolean;

jumlah_anak

: Integer;

Keterangan

: String[25]; By : Teguh Cahyono,ST,M.Kom

Deklarasi Tipe 





Data tipe sederhana (simple-type-data). Terdiri dari : a. Type data standar (Standard data type) - Integer - Char -boolean - real - String. b. Type data didefinisikan pemakai (User defined data type ). - Euimerated / scalar type. - Subrange type. Data tipe terstruktur (structured-type-data),terdiri dari: - Array -Record - file - Set Data tipe penunjuk (pointer-type-data) By : Teguh Cahyono,ST,M.Kom

Deklarasi label. 



Bila program menggunakan statement go to, untuk meloncat ke suatu statement yang tertentu, maka 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 dengan kumpulan identifier label dengan dipisahkan oleh koma dan diakhiri dengan titik koma. By : Teguh Cahyono,ST,M.Kom

Contoh Deklarasi Label Program contoh_label(layar); Label 100,selesai; Begin <-----------------------------------identifier label. Writeln(‘Bahasa’); go to 100; Writeln(‘Basic’); Writeln(‘Cobol’); 100 <-------------------------------------label yang dituju. Writeln(‘Pascal’); go to selesai; Writeln(‘Forttran’); Selesai <-------------------------------Label yang dituju End.


Deklarasi Prosedur 

Prosedur merupakan bagian yang terpisahkan dari program dan dapat diaktifkan dimanapun didalam program. Prosedur dapat berupa prosedur standar (sudah didefinisikan oleh program Pascal) maupun prosedur yang akan dibuat sendiri oleh pemakai Contoh :

Procedure

Hitung

(x,y ; Integer;);

indentifier nama kumpulan paraneter Kata cadangan

prosedur

Program contoh_prosedur(layar); Procedure tambah(x,y:integer; var hasil:integer); Begin

hasil :=x +y; end


Deklarasi Fungsi 

Fungsi juga merupakan bagian program yang terpisah mirip dengan prosedur, tapi ada beberapa perbedaannya. Fungsi dapat berupa fungsi standar ( sudah ada didalam Pascal) atau fungsi yang akan dibuat sendiri oleh pemakai.


Contoh Deklarasi Fungsi Function pangkat(x,y ; real) :real;  tipe fungsi nama fungsi Kata cadangan kumpulan parameter Program contoh_fungsi(layar); Function tambah(x,y:integer):integer; Begin

tambah :=x + y ; End; {program utama} Begin Writeln(‘2 + 3 = ‘,tambah(2,3));

End. Out Put : 2 + 3 = 5.


Bab II Algoritma dan logika

Recommend Documents