Algoritma pemrograman-dalam-bahasa-pascal

Komunitas eLearning IlmuKomputer.Com
Copyright © 2003-2007 IlmuKomputer.Com
1
Algoritma Pemrograman Dalam Bahasa Pascal
Budi Permana, S.Kom
nobiasta@gmail.com
Pendahuluan
Puji syukur penulis panjatkan kepada Allah SWT yang telah memberikan kesehatan dan kemudahan sehingga penulis dapat menyelesaikan modul ini. Tidak lupa penulis juga ucapkan terima kasih kepada almarhum ayah semoga amal ibadahnya di terima di sisi Allah SWT, Ibu dan Nenek.
Karena penulis juga manusia dan memiliki kekurangan semoga kritik dan saran membangun diperlukan untuk penulis guna menjadikan buku ini lebih baik lagi. Kritik dan saran bisa disampaikan melalui :
Facebook : Budhi Nobi Permana
Email FB : nobinice@gmail.com
Email : nobiasta@gmail.com
YM : budinobipermana@yahoo.co.id
Akhir kata penulis ucapkan terima kasih semoga menjadi ilmu bermanfaat bagi mereka yang menggunakan buku ini amin.
Lisensi Dokumen:
Seluruh dokumen di IlmuKomputer.Com dapat digunakan, dimodifikasi dan disebarkan secara bebas untuk tujuan bukan komersial (nonprofit), dengan syarat tidak menghapus atau merubah atribut penulis dan pernyataan copyright yang disertakan dalam setiap dokumen. Tidak diperbolehkan melakukan penulisan ulang, kecuali mendapatkan ijin terlebih dahulu dari IlmuKomputer.Com.

2
BAB I
Dasar-dasar Algoritma
A. Sejarah Algoritma Algoritma adalah suatu perintah yang berisi langkah-langkah untuk menyelesaikan masalah. Algoritma berasal dari nama tokoh ilmuan islam pada masa itu yaitu Abu Ja’far Muhammad Ibu Musa Al Khawārizmi yang hidup sekitar abad ke-9. Dengan karya bukunya yang terkenal yaitu Al Jabar Wal Muqabala berarti “Buku Pemugaran dan Pengurangan”.
Pada awalnya kata algorisma adalah istilah yang merujuk kepada aturan-aturan aritmetis untuk menyelesaikan persoalan dengan menggunakan bilangan numerik arab (sebenarnya dari India, seperti tertulis pada judul di atas). Pada abad ke-18, istilah ini berkembang menjadi algoritma, yang mencakup semua prosedur atau urutan langkah yang jelas dan diperlukan untuk menyelesaikan suatu permasalahan.
Berikut adalah contoh bagaimana algoritma dapat menyelesaikan masalah :
Soal1 :
1. Terdapat dua buah gelas yang berisi air berwarna merah dan berisi air berwarna biru. Kita asumsikan gelas yang merah adalah A dan gelas yang berwarna biru adalah B. Jika isi ingin kita pindahkah ke dalam gelas B dan isi berpindah A agar tidak merubah warna masing-masing gelas tentukan cara bagaimana mana tersebut dapat berpindah tempat tanpa merubah isi dalam gelas tersebut.
Penyelesaiannya : 1. Kita tambahkan gelas kosong yang kita asumsikan sebagai C. 2. Pindahkan isi gelas A ke dalam kosong C sehingga sekarang kosong dan isi gelas C adalah air berwarna merah. 3. Setelah itu pindahkan isi gelas B ke dalam A sehingga kosong dan berpindah ke gelas A. 4. Pindahkan isi gelas C yang berisi air berwarna merah kedalam B sudah kosong karena isinya berpindah ke dalam gelas A.

3
5. Hasil akhirnya adalah A berisi air berwarna biru dan B merah.
Soal 2 : 1. Untuk menelepon menggunakan telpon umum maka kita di hadapkan pada langkah-langkah menelpon di telpon umum tersebut. Uraikan lah langkah-langkah tersebut.
Penyelesaian :
1. Pertama angka gagang telpon. 2. Kemudian masukan koin 3. Setelah itu tekan nomor telpon yang di tuju 4. Dan setelah telpon terhubung maka berbicara jika tidak tutup kembali umum.
Perhatikan bagaiamana suatu algoritma dapat menyelesaikan masalah tanpa menimbulkan masalah baru. Algoritma adalah suatu hal yang penting harus di kuasai oleh para programmer. Karena setiap masalah yang dihadapi seorang programmer dapat diselesaikan dengan algoritma.
B. Dasar Algoritma  Pernyataan dan aksi
Pernyataan adalah setiap langkah penyelesaian suatu algoritma. Sebuah pernyataan menggambarkan aksi (action) algoritmik yang dapat dieksekusi.
Berikut adalah contoh bagaimana perbedaan pernyataan dan aksi :
Tulis “Tugas algoritma telah selesai”
Disini tulisan yang berwarna merah adalah menggambarkan pernyataan sedangkan yang berwarna biru adalah yang menggambarkan aksi sehingga menghasilkan tulisan berwarna merah. Jika program diatas di jalankan pascal maka akan menghasilkan sebagai berikut :
Tugas algoritma telah selesai  Runtutan/Sequence Algoritma merupakan runtunan satu atau lebih instruksi, yang berarti bahwa : a. Tiap instruksi di kerjakan satu persatu; b. Tiap instruksi dilaksanakan tepat sekali; tidak ada yang di ulang; c. Urutan instruksi yang dilaksanakan pemroses sama dengan urutan

4
sebagaimana yang tertulis didalam teks algoritmanya; d. Akhir dari instruksi terakhir adalah akhir algoritma.
Contoh runtunan : Langkah 1 Tuangkan isi gelas A ke dalam gelas C  Langkah 2 Tuangkan isi gelas B ke dalam gelas A  Langkah 3 Tuangkan isi gelas C ke dalam gelas B
Contoh Runtunan di Pascal
Program Selamat_Pagi_Dunia;
Uses wincrt;
begin
Write(‘Selamat Pagi Dunia’);
End.
Penjelasan :
Runtunan pada algoritma di atas hanya menampilkan kata ‘Selamat Pagi Dunia’ ketika program di run.
 Pemilihan
Adakalanya sebuah program dihadapkan pada suatu kondisi dimana tersebut menentukan alur program yang akan kita buat.
Contoh 1
Jika keran air kita tutup maka
Air tidak akan keluar
Pernyataan diatas dapat kita tulis dalam pernyataan kondisional sebagai berikut :
If kondisi then Aksi
Jika kita tulis :
If keran air di tutup then Air tidak akan keluar
If keran air di buka then Air akan keluar

5
Contoh lainnya sebagai berikut :
If bensin habis then Motor mogok
If air mendidih then Matika kompor
If motor rusak then Jalan kaki saja
Dalam bahasa Indonesia If berarti jika dan then maka dimana setiap kondisi bias menghasilkan nilai benar atau salah.
 Pengulangan
Jika di banding dengan manusia kelebihan computer adalah tidak mengenal kata lelah jika mengerjakan pekerjaan yang sama secara berulang kali. Tentunya kita pernah diberi tugas menulis kata yang sama sewaktu di bangku sekolah dasar oleh guru. Dimana kita disuruh menulis kata “Saya akan belajar yang rajin” sebagai bentuk latihan kita dalam membentuk huruf tulisan agar kita menjadi lebih baik bukan. Tetapi terkadang latihan yang kerjakan membuat kita jenuh dan bosan.
Contoh algoritma yang kurang cerdas untuk menuliskan kata sebanyak 100 x sebagai berikut :
Program menulis_kata;
{Menuliskan kata sebanyak 100 kali}
Deklarasi
{Tidak ada}
Algoritma
Tulis ‘Saya akan belajar yang rajin’;
……………………………………..
Alangkah baiknya jika pengulangan tersebut kita buat secara otomatis yaitu dengan menggunakan algoritma perulangan sebagai berikut :
Program menulis_kata;
{Menuliskan kata sebanyak 100 kali}
Deklarasi
Algoritma
For i dari 1 sampai 100
End for
Algoritma diatas akan mengulangi kata ‘Saya akan belajar yang rajin’ sampai 100 kali, apabila perulangan sudah terpenuhi maka pun akan berhenti.

6
BAB II Tipe, Operarator Dan Eskpresi Variabel dan konstanta adalah objek data yang biasa dimanipulasi didalam sebuah program. Agar dapat di eksekusi oleh program terlebih dulu tipe data variable tersebut harus di deklarasikan sebelum program dapat di eksekusi. Hasil akhir dari eksekusi adalah menghasilkan sebuah result dimana program mengkombinasikan setiap variable sehingga menghasilkan suatu nilai baru. Tipe data dikelompokan menjadi 2 yaitu tipe dasar dan tipe bentukan. 1. Tipe Dasar Tipe dasar adalah tipe yang sudah ada dan dapat langsung di pakai. Yang termasuk tipe dasar adalah bilangan lojik, bilangan bulat, karakter, bilangan riil, dan string. Contoh Tipe data dalam PASCAL:  integer (contoh: -1, -2, 0, 83, 1283)  real (contoh: -1.242, 39.0, 1.87)  char (contoh: „a‟, „b‟, „c‟)  boolean (contoh: true, false)  string (contoh: „al-azhar‟, „nama_saya‟) Bilangan Lojik Nama tipe bilangan lojik adalah Boolean. Kata booelan ini diambil dari nama seorang tokoh matematikawan Inggris yang bernama George Boole. Bilangan lojik ini hanya mengenal dua nilai yaitu true atau false. Biasanya tipe Boolean ini sering di aplikasikan pada operasi logika dimana logika ini menghasilkan nilai true atau false. Operator yang sering digunakan untuk operasi logika ini adalah not, and, or dan xor.

7
Bilangan Bulat Bilangan bulat terdiri dari bilangan cacah (0, 1, 2, 3, ...) dan negatifnya (-1, -2, -3, ...; -0 adalah sama dengan 0 sehingga tidak lagi dimasukkan secara terpisah). Bilangan bulat dapat dituliskan tanpa mengandung komponen desimal atau pecahan. Nama tipe dari bilangan bulat ini adalah integer. Tipe bilangan bulat ini mempunyai ranah nilai yang tidak terbatas. Berikut tipe data integer yang memiliki rentang nilai tertentu, yaitu : byte, shortint, word, integer dan longint. Tipe Rentang Nilai Byte 0 . 255 Shortint -128 . 27 Word 0 . 65535 Integer -32768 . 32767 Longint -2147483648 . -2147483648 Operasi bilangan bulat ada dua, yaitu Operasi Aritmatika Operasi Perbandingan + < - <= * > Div >=

8
Mod = <> Bilangan Riil Dalam matematika, bilangan riil atau bilangan real menyatakan bilangan yang bisa dituliskan dalam bentuk desimal, seperti 2,4871773339… atau 3.25678. Nama tipe dari bilangan riil adalah real. Tipe real dapat direpresentasikan ke dalam empat macam tipe, yaitu real, single, double dan extended. Tipe Rentang Real 2.9 x 10-39 . 1.7 x 1018 Single 1.5 x 10-45 . 3.4 x 1038 Doble 5.0 x 10-324 . 1.7 x 10308 Extended 3.4 x 10-4932 . 1.1 x 104932
Setiap konstanta yang bertipe bilangan riil harus ditulis dengan tanda titik desimal.
Operasi yang dilakukan terhadap bilangan riil ada dua macam, yaitu :

9
Operasi Aritmatika Operasi Perbandingan + < - <= * > / >= = <>
Karakter
Karakter adalah mencakup huruf abjad, tanda baca, angkayang diberi tanda petik (‘0’) dan karakter khusus seperti ‘&’, ‘@’. Nama tipe dari karakter ini adalah char.
Operasi tipe karakter adalah operasi perbandingan
Operasi Perbandingan = < <> <= >= >
String Tipe data string adalah tipe yang digunakan untuk menyimpan barisan karakter. Nama tipe dari string ini adalah string. Biasanya Konstanta string harus diapit oleh tanda petik tunggal, contoh : ‘Presiden’, ‘Indonesia’.
Operasi
Operasi yaitu operator aritmatika (+) dan operasi perbandingan.

10
Operasi Aritmatika Operasi Perbandingan + < <= > >= = <> 2. Tipe Bentukan Tipe bentukan adalah tipe yang dibuat sendiri sesuai keinginan pemrogram. Contoh : Type Bilangan : real; Tipe bilangan diatas adalah tipe bilangan real. Dalam implementasinya jika kita memiliki variable R yang bertipe bilangan maka tipe R tersebut sama dengan tipe bilangan real.

11
BAB III Pemilihan Dalam Bahasa Pascal Didalam membuat program tentunya ada masalah yang dapat di pecahkan secara langsung seperti menghitung sebuah persegi panjang yang hasilnya bias kita dapatkan dari perkalian panjang * lebar. Tentunya setiap masalah memiliki penangan yang berbeda, seperti didalam sebuah perkuliahan bagaimana kita bias menentukan nilai grade A, grade B grade C dari hasil nilai angka yang kita dapatkan. 1. Statemen IF Penggunaan statement If ini adalah bagaimana kita mengkondisikan sebuah expresi dimana kita menentukan sendiri mana expresi yang menghasilkan nilai true dan mana expresi yang menghasilkan nilai false. Untuk aturan penulisan statement IF ini adalah sebagai berikut :
If kondisi then
Statement1
else
statement2
end; Statement di atas dapat kita ilustrasikan sebagai berikut : 1. Jika suatu kondisi menghasilkan nilai true maka statement 1 akan dijalankan. 2. Sebaliknya jika suatu kondisi menghasilkan nilai false maka statement 2 lah yang akan di jalankan. Berikut kita akan membuat program grade menggunakana statement If dengan bahasa pascal.

12
Contoh program 1 : Kode di atas jika di jalankan akan menghasilkan output sebagai berikut : Penjelasa kode : Kode Keterangan Write („Masukan Nilai Uas ‟) Berfungsi untuk menampilkan teks „Masukan Nilai‟ Readln(n) Berfungsi sebagai inputan nilai Uas. If n >= 8 then write („Grade A‟) Jika nilai inputan lebih besar dari n maka akan menampilkan Grade A If (n >= 7) and (n <8) then write(„Grade Jika nilai inputan lebih besar sama dengan

13
B‟) 7 dan kurang dari 8 maka akan menampilkan Grade B. Else write („Grade C‟) Jika inputan tidak memenuhi kriteria A dan tidak memenuhi kriteria B makan akan menampilkan Grade C. Contoh program 2 : Jika kode yang dimasukan nobi maka akan menghasilkan output sebagai berikut :

14
Penjelasan kode : Kode Keterangan Write („Masukan ‟) Berfungsi untuk menampilkan teks „Masukan Password‟ Readln(n) Berfungsi sebagai inputan password If n = „nobi‟ then write („Password Benar‟) Jika nilai inputan benar = nobi maka akan menampilkan „Password Benar‟ Else write(„Password Salah‟) Jika nilai inputan salah tidak sama dengan nobi maka akan menampilkan „Password Salah‟ Contoh Program 3: Jika di run maka akan menghasilkan output sebagai berikut :

15
Penjelasan kode : Kode Keterangan Write („Masukan ‟) Berfungsi untuk menampilkan teks „Masukan Bilangan‟ Readln(n) Berfungsi sebagai inputan angka If n mod 2 = 0 write („ini bilangan Genap‟) Jika kondisi n memenusi kriteria maka n adalah bilangan genap. Else („ini bilangan Ganjil‟) Jika tidak maka n adalah bilangan ganjil Contoh Program 4 : Jika di run maka akan menghasilkan output sebagai berikut :

16
Penjelasan kode : Kode Keterangan Write („Masukan Nilai A ‟) Write („Masukan Nilai B ‟) Berfungsi untuk menampilkan teks „Masukan Nilai A dan B‟ Readln(n) Berfungsi sebagai inputan angka If n > I then write(„Bilangan terbesar adalah A‟) Jika nilai n lebih besar dari I maka akan menampilkan pesan Bilangan terbesar adalah A. Else write(„Bilangan terbesar adalah B‟) Jika kondisi pertama tidak terpenuhi maka akan menampilkan pesan Bilangan terbesar adalah B Contoh Program 5 : Jika di run maka akan menghasilkan output sebagai berikut :

17
Penjelasan kode : Kode Keterangan Write („Cuaca hari ini mendung atau cerah ‟) Berfungsi untuk menampilkan teks „cuaca hari ini mendung atau cerah‟ Readln(n) Berfungsi sebagai inputan mendung atau cerah If cuaca = „mendung‟ then writeln(„Hari ini Hujan‟) Jika inputan cuaca sama dengan mendung maka akan menampilkan pesan hari ini hujan. Else write(„Hari ini panas‟) Jika inputan cuaca sama dengan cerah maka akan menampilkan pesan hari ini panas 3. Statement Case Of Sejauh ini, Anda telah belajar bagaimana menggunakan statemen If. Namun dalam beberapa kasus, statement Case Of lebih disukai untuk pernyataan If karena mengurangi beberapa kode yang tidak perlu, tetapi makna yang sama tetap dipertahankan. Case of ini sangat mirip dengan statement If dalam penggunaanya. Berikut adalah aturan penggunaan statement Case Of :
case (expression) of
L1 : S1;
L2: S2;
...
...
Ln: Sn;
end; Dimana, L1, L2 ... adalah Case label, atau nilai-nilai masukan yang bisa integer, karakter, boolean atau disebutkan item data. S1, S2, ... adalah pernyataan, masing-masing pernyataan mungkin memiliki satu atau lebih dari satu label kasus yang terkait

18
dengannya. Ekspresi ini disebut Case pilihan atau Case indeks. Case Indeks mengasumsikan nilai-nilai yang sesuai dengan case label. Aturan berikut berlaku untuk case statement :  Ekspresi yang digunakan dalam sebuah case statment harus memiliki tipe integral atau enumerasi, atau menjadi tipe kelas di mana kelas memiliki fungsi konversi tunggal untuk tipe integral atau enumerasi.  Setiap Case diikuti dengan nilai yang akan dibandingkan dengan titik dua.  Case Label untuk case harus tipe data yang sama sebagai ekspresi dalam case statment, dan harus berupa sebuah konstanta atau literal.  Compiler akan mengevaluasi ekspresi case. Jika salah satu dari nilai case label ini sesuai dengan nilai ekspresi, pernyataan yang mengikuti label ini dijalankan. Setelah itu, program akan berakhir.  Jika tidak ada case label yang sesuai dengan nilai ekspresi aliran program akan berakhir. Perhatikan data flow diagram berikut :

19
Contoh Program 1 : Jika di run maka akan menghasilkan output sebagai berikut : Penjelasan kode : Kode Keterangan Write („Masukan ‟) Berfungsi untuk menampilkan teks „Input hari ke‟ Readln(n) Berfungsi sebagai inputan pilihan Case pilih of Jika kita menginput angka no 1 maka akan tampil pesan senin.

20
Contoh Program 2 : Jika di run maka akan menghasilkan output sebagai berikut : Penjelasan kode : Kode Keterangan Write („Masukan Nilai ‟) Berfungsi untuk menampilkan teks „Masukan Nilai‟ Readln(n) Berfungsi sebagai inputan nilai Case nilai of Jika kita menginputkan nilai 80 maka akan tampil pesan Grade B. case nilai of berisi list nilai grade.

21
Contoh program 3 : Jika di run maka akan menghasilkan output sebagai berikut : Penjelasan kode : Kode Keterangan Nilai_Huruf = „B‟ Jika kita memasukan huruf B dan menjalankan program maka akan tampil pesan „Well Done‟ , „Your Grade is B‟ kita bias mengganti B menjadi A atau C. Case nilai_huruf of Berisi nilai list grade.

22
Contoh Program 4 :
Jika program di run maka akan menghasilkan output sebagai berikut :
Penjelasan kode: Kode Keterangan Write („Masukan mata pelajaran ‟) Berfungsi untuk menampilkan teks „Masukan kode mata pelajaran‟ Readln(pilih) Berfungsi sebagai inputan pilihan Case pilih of Jika kita menginput angka no 2 maka akan tampil pesan Pemrograman Visual Studio 2010. Case pilih of ini berisi list pilihan mata pelajaran.

23
BAB IV
Perulangan Dalam Bahasa Pascal
Salah satu kelebihan komputer apabila di bandingkan dengan manusia adalah dapat melakukan suatu perintah yang sama secara berulang-ulang tanpa mengenal lelah dan bosan. Kelebihan ini lah yang tidak di miliki oleh manusia. Sehingga manusia dapat memanfaatkan kelebihan ini untuk kepentingannya dalam menyelesaikan tugas-tugas keseharian.
Di dalam bahasa pascal terdapat 3 pernyataan perulangan yang lazim sering digunakan oleh para pemrogram. Ketiga pernyataan itu adalah sebagai berikut : 1. Pernyataan For, 2. Pernyataan While, dan 3. Pernyataan Repeat.
Ada baiknya setiap pernyataan tersebut kita pahami satu persatu. Karena dalam masalah yang kita hadapi perlu penangan berbeda pula. Oleh Karen itu setiap pernyataan tersebut memiliki fungsi yang berbeda-beda dalam setiap pengaplikasiannya.
1. Pernyataan For
Perulangan for digunakan untuk mengulang statmen sebanyak yang telah didefinisikan sebelum perulangan tersebut di eksekusi. Perulangan For..to.. do biasanya digunakan apabila pencacah sudah di ketahui.
For pencacah <- nilai awal to akhir do
pernyataan
end for;
Keterangan : a. Pencacah harus berupa tipe data integer atau karakter. b. Nilai awal harus lebih kecil atau sama dengan nilai akhir. c. Pernyataan adalah statmen yang di ulang sebanyak berulang kali.
Berikut adalah contoh-contoh pengaplikasian pernyataan for dalam bahasa Pascal.
Contoh Program 1 :

24
Apabila di run maka akan menghasilkan output sebagai berikut :
Penjelasan kode : Kode Keterangan Write („Masukan jumlah nilai yang akan di ulang = ‟) Berfungsi untuk menampilkan teks „Masukan jumlah nilai yang akan di ulang =‟ Readln(n) Berfungsi sebagai inputan jumlah nilai angka For I := 1 to n Writeln(„Saya berjanji tidak akan nakal lagi‟) Berfungsi sebagai perulangan dimana pengulangan sesuai dengan nilai n dan akan menampilkan pesan saya berjanji tidak akan nakal lagi.
Contoh Program 2 :

25
Jika di run maka akan menghasilkan output sebagai berikut :
Penjelasan kode : Kode Keterangan Write („Tulis angka dari 1 sampai dengan ‟) Berfungsi untuk menampilkan teks „Tulis angka dari 1 sampai dengan‟ Readln(n) Berfungsi sebagai inputan jumlah nilai angka For I := 1 to n Writeln(i) Berfungsi sebagai perulangan dimana pengulangan sesuai dengan nilai n dan akan menampilkan angka sebanyak n.
Contoh Program 3:

26
Penjelasan kode : Kode Keterangan Write („Input angka = 7 ‟) Berfungsi untuk menampilkan teks „input angka =‟ Readln(n) Berfungsi sebagai inputan jumlah nilai angka n For I := n downto 0 Writeln(i) Berfungsi sebagai perulangan dimana pengulangan sesuai dengan nilai n dan akan menampilkan angka terbesar hingga terkecil.
2. Pernyataan While Pernyataan while ini akan melakukan perulangan selama kondisi bernilai benar/true. Jika perulang bernilai salah/false maka perulangan akan berhenti.
While kondisi do
pernyataan
endwhile; contoh program 1:

27
Jika di run maka akan menghasilkan output sebagai berikut : Penjelasan kode : Kode Keterangan Write („Input angka ‟) Berfungsi untuk menampilkan teks „Input angka‟ Readln(n) Berfungsi sebagai inputan angka J := 0 dan I := 1 Sebagai inisialisasi j sebagai 0 dan I sebagai 1 while i <= n do begin Selama I kurang dari n maka proses akan terus di lanjutkan

28
j := j + i; i := i + 1; end; Variable j ditambah dengan 1 kemudian hasil penambahan akan di tampung di variable j Variable i ditambah dengan 1 kemudian hasil penambahan akan di tampung di variable I apabila data yang ditampung melebihi nilai n maka proses akan berhenti.
3. Pernyataan repeat
Contoh program 1 :

29
Penjelasan kode : Kode Keterangan Write („Masukan angka perulangan= ‟) Berfungsi untuk menampilkan teks „Masukan angka perulangan= ‟ Readln(n) Berfungsi sebagai inputan angka I := 1; Inisialisasi I sebagai 1 Repeat Pernyataan perulangan Writeln(I,‟SMK Marhas‟) Untuk menampilkan pesan SMK Marhas sedangkan „I‟ akan menampilkan angka sebanyak di ulang. i = I + 1; until I > n Berfungsi apabila nilai I lebih besar dari n maka perulangan akan berhenti.
Contoh program 2 :

30
Penjelasan kode : Kode Keterangan Write („Masukan Password ‟) Berfungsi untuk menampilkan teks „Masukan Password‟ Readln(n) Berfungsi sebagai inputan password I := „n‟ Inisialisasi I sebagai karakter n If n = „nobi‟ then writeln(„Password Benar‟) Jika inputan n sama dengan nobi maka akan menapilkan pesan password benar. Else writeln(„Password Salah‟) Jika kondisi pertama tidak terpenuhi maka akan menampilkan pesan Password salah. Write(„Cobal lagi ?‟) readln(i) Until I = „n‟ Akan menampilkan pesan pertanyaan Coba lagi. Jika ya maka program akan di ulang dan jika memasukan nilai n maka program akan berhenti.

31
Contoh program 3:
Penjelasan kode : Kode Keterangan Write („Cuaca hari ini mendung atau cerah ? ‟) Berfungsi untuk menampilkan teks „Cuaca hari ini mendung atau cerah ? ‟ Readln(cuaca) Berfungsi sebagai inputan nilai I := „n‟ Inisialisasi I sebagai karakter n If cuaca = „mendung‟ then writeln(„Hari ini hujan‟) Jika inputan cuaca sama dengan mendung maka akan menapilkan pesan hari ini hujan. Else writeln(„Hari ini panas‟) Jika kondisi pertama tidak terpenuhi maka akan menampilkan pesan Hari ini panas.

32
Write(„Cobal lagi ?‟) readln(i) Until I = „n‟ Akan menampilkan pesan pertanyaan Coba lagi. Jika ya maka program akan di ulang dan jika memasukan nilai n maka program akan berhenti.

33
BAB V
Procedure Dalam Bahasa Pascal
Prosedur adalah sebuah sub program yang dibuat terpisah dari utama dapat di panggil sewaktu-waktu oleh program utama. Prosedure merupakan yang tidak berdiri sendiri karena tidak dapat di eksekusi secara langsung. Procedure dapata memiliki parameter atau juga tidak. Procedure yang memiliki parameter biasanya variable-variabel/peubahnya biasa di deklarasikan pada bagian header procedure.
Penulisan Procedure
Berikut adalah contoh penulisan procedure tanpa parameter:
Berikut adalah cara pemanggilan procedure tanpa parameter di dalam program:
Pada program diatas kita dapat perhatikan bagaimana procedure dipanggil melalui program utama. Sehingga ketika program di jalankan utama langsung memanggil procedure.
Contoh program procedure dengan parameter :

34
Agar dapat memahami langkah-langkah pembuatan program seperti di atas, sebagai latihan buatlah program menghitung luas segitiga menggunakan procedure.

35
BAB VI
Fungsi Dalam Bahasa Pascal Fungsi adalah program kecil yang berada dalam utama digunakan untuk menyelesaikan masalah khusus dengan paramater yang diberikan. Penggunaan fungsi hamper mirip dengan procedure.
Penulisan Fungsi
Konsep fungsi di dalam bahasa pascal mirip dengan konsep matematika dimana fungsi digunakan untuk menghitung nilai berdasarkan masukan.
Berikut adalah contoh program menggunakan fungsi :
Perhatikan bagaimana fungsi ini digunakan.

36
Agar dapat memahami langkah-langkah pembuatan program seperti di atas, sebagai latihan buatlah program menghitung luas segitiga menggunakan fungsi.
Refrensi 1. Fathul Wahid.2004. Dasar-dasar Algoritma dan Pemrograman.Yogyakarta. Penerbit Andi 2. Rinaldi Munir. 2005. Algoritma dan Pemrograman Dalam Bahasa Pascal C. Bandung Edisi Ke 3 Buku 1.Bandung.Penerbit Informatika. 3. http://id.wikipedia.org/wiki/Algoritma. 4. http://www.itechsoft.web.id/tipe-operator-dan-ekspresi-dalam-algoritma-pemograman.html 5. http://iamazzahra.blogspot.com/2009/06/algoritma-dan-struktur-data.html 6. http://id.wikipedia.org/wiki/Bilangan_bulat 7. http://id.wikipedia.org/wiki/Bilangan_riil 8. http://id.wikipedia.org/wiki/String 9. http://www.irietools.com/iriepascal/progref357.html 10. http://www.tutorialspoint.com/pascal/pascal_case_statement.htm 11. http://id.wikibooks.org/wiki/Pemrograman_C/Prosedur_dan_Fungsi
Biografi Penulis
Budi Permana, S.Kom adalah alumni Stmik Mardira Indonesia dari kota Bandung, setelah lulus melanjutkan kuliah selama 6 bulan untuk mengambil Akta IV di UNISBA. Penulis pernah bekerja sebagai teknisi jaringan dan guru di Smk Marhas dan pernah juga bekerja sebagai Konsultan IT.

Algoritma pemrograman-dalam-bahasa-pascal

More Related Content

What's hot (18)

Similar to Algoritma pemrograman-dalam-bahasa-pascal (20)

More from Budi Permana (20)

Recently uploaded (17)

Algoritma pemrograman-dalam-bahasa-pascal