Kamis, 10 Maret 2016

PERULANGAN REPEAT … UNTIL

III. PERULANGAN REPEAT … UNTIL

Makna dari kata repeat disini berarti bahwa perulangan akan terjadi, sementara kata until berarti sampai nilai yang ditetapkan pada until ditemukan. Sehingga perulangan akan dilakukan secara terus menerus sampai menemukan nilai terpenuhi pada until. Jika nilai pada until ditemukan maka perulangan di berhentikan.

Jika dilihat dari bentuk algoritma flowchartnya, perulangan ini mirip dengan perulangan FOR..DO, sementara jika dilihat dari struktur programnya, perulangan ini justeru terlihat mirip dengan perulangan WHILE..DO.

Akan tetapi ternyata, perulangan ini jelas berbeda dari keduanya. Dimana pada perulangan for..do dan while..do, perulangan akan dilakukan selama nilai variabel perulangan benilai benar, sampai menemukan nilai variabel tidak lagi memenuhi syarat pengulangan.

Sementara, pada peruluangan repeat..until, proses justeru akan terus berulang sampai menemukan nilai pada until (atau nilai pada until bernilai benar). Lebih jelas perulangan ini bisa dilihat dari bentuk flowchart berikut :




MENERAPKAN PERULANGAN REPEAT..UNTIL DALAM PASCAL

Mari kita terapkan perulangan repeat until dalam pascal. Untuk menggunakannya, terlebih dahulu kita harus memahami struktur program pascalnya. Adapun struktur program pascal untuk repeat..until adalah sebagai berikut :



Dari gambar flowchart diatas, dapat dijelaskan algoritmanya sebagai berikut :
  1. Step 1 : memulai program (start)
  2. Step 2 : mengenalkan variabel m, dan memberi nilai awal = 1
  3. Step 3 : memproses perulangan. Proses yang dimaksud disini, bisa proses mencetak ke monitor, atau melakukan perubahan nilai variabel dari nilai sebelumnya.
  4. Step 4 : membuat pengujian / menguji nilai m. Apakah m = nilai pada until. Dimana until = 10? Jika m = 10, maka nilai variabel telah terpenuhi, dan perulangan berhenti. Dan jika nilai m tidak memenuhi syarat pada until, maka perulangan terus dilakukan sampai menemukan nilai 10.
  5. Step 6 : mengakhiri perulangan (stop).


Baik, langsung saja, buka program turbo pascalnya, dan ikuti panduan program seperti pada gambar-gambar berikut :

  1. Buka program turbo pascal, dan ketik kode program berikut :



  2. Kompile program, dan pastikan sukses



  3. Run program, akan tampil hasil program sebagai berikut :




LATIHAN
Buatlah (tiga) program untuk :
  1. Mencetak kalimat "Pascal DOSBOX sebanyak 10 kali
  2. Mencetak bilangan bulat ganjil saja
  3. Mencetak bilang bulat genap saja

  4. Semoga Belajar !!!

Rabu, 09 Maret 2016

PERULANGAN WHILE..DO

II. PERULANGAN WHILE..DO

Pada prinsipnya perulangan model while..do ini sedikit berbeda dengan perulangan model perulangan for..do. Prinsip yang paling mendasar pada model perulangan ini adalah, perulangan akan dilakukan (diproses) jika kondisi terhadap nilai variabel perulangan bernilai benar (true) atau memenuhi syarat perulangan.

Dengan kata lain, pada perulangan pengujian terhadap nilai variabel dilakukan diawal, lalu kemudian perulangan akan dilakukan jika pada pengujian nilai variabel bernilai benar. Selain itu, pada model ini, perulangan tidak dapat diprediksi berapa kali akan melakukan perulangan, meskipun secara system masih dapat dikendalikan. Lebih jelas mengenai perulangan model ini dapat dilihat seperti pada gambar flowchart perulangan while..do berikut ini :



Dari gambar flowchart diatas, dapat disimpulkan sebagai berikut :

  1. Step 1 : Memulai program (Start)
  2. Step 2 : Mengenalkan variabel dan tipe data, serta memberikan nilai awal
  3. Step 3 : Menguji nilai variabel, apakah nilai variabel memenuhi syarat perulangan ? Pada step ini nilai awal variabel akan di periksa (oleh kompiler / interpreter) sesuai dengan kebutuhan. Misalnya, nilai awal variabel <= 10 maka perulangan akan diulang sampai nilai variabel tidak lagi terpenuhi atau nilai variabel = 10.
  4. Step 4 : Mengubah nilai variabel. Nilai variabel akan berubah dengan formulasi indeks = indeks + 1, maka jika nilai awal adalah 1, maka nilai variabel akan bertambah 1 point menjadi 2. Nilai 2 atau nilai variabel akan diuji kembali sampai nilai variabel tidak memenuhi kriteria indeks <=10.
  5. Step 5 : Mengakhiri program.

MENERAPKAN PERULANGAN WHILE..DO DENGAN PASCAL

Untuk dapat menggunakan perulangan while..do ini kita harus memperhatikan struktur dasar perulanganya. Dalam penulisan kode programnya, tidak boleh keluar dari struktur penulisannya. Adapun struktur dasar perulangan while..do yang dimaksud adalah seperti pada gamber berikut :


Setelah melihat struktur dasar perulangannya, mari kita terapkan dalam program. Silahkan bukan program turbo pascal dengan dosbox. Selanjutnya ketika program berikut :

  1. Ketik program seperti pada gambar berikut :




  2. Kompile program, dan pastikan sukses




  3. Run program, tampilan hasil program perulangan sebagai berikikut :




LATIHAN
Buatlah (tiga) program untuk :
  1. Mencetak kalimat "Pascal DOSBOX sebanyak 10 kali
  2. Mencetak bilangan bulat ganjil saja
  3. Mencetak bilang bulat genap saja

Selamat belajar !!!