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 !!!