Selasa, 12 April 2011

Struktur Pengulangan


Dalam banyak kasus seringkali kita dihadapkan pada sejumlah pekerjaan yang harus diulang berkali. Pada pembuatan program komputer, kita juga kadang-kadang harus mengulang satu atau sekelompok perintah berkali-kali agar memperoleh hasil yang diinginkan.  Dengan menggunakan komputer, eksekusi pengulangan mudah dilakukan.  Hal ini karena salah satu kelebihan komputer dibandingkan dengan manusia adalah kemampuannya untuk mengerjakan tugas atau suatu instruksi berulangkali tanpa merasa lelah, bosan, atau malas.

Struktur pengulangan terdiri dari dua bagian :

* Kondisi pengulangan, yaitu syarat yang harus dipenuhi untuk melaksanakan pengulangan.  Syarat ini  biasanya dinyatakan dalam ekspresi Boolean yang harus diuji apakah bernilai benar (true) atau salah (false)
* Badan pengulangan (loop body), yaitu satu atau lebih instruksi yang akan diulang Pada struktur pengulangan, biasanya juga disertai bagian inisialisasi dan bagian terminasi.   Inisialisasi adalah instruksi yang dilakukan sebelum pengulangan dilakukan pertama kali.  Bagian insialisasi umumnya digunakan untuk memberi nilai awal sebuah variable.  Sedangkan  terminasi adalah instruksi yang dilakukan setelah pengulangan selesai dilaksanakan.   Ada beberapa bentuk pengulangan yang dapat digunakan, masing-masing dengan syarat dan karakteristik tersendiri.  Beberapa bentuk dapat dipakai untuk kasus yang sama, namun ada bentuk yang hanya cocok untuk kasus tertentu saja.  Pemilihan bentuk pengulangan untuk masalah tertentu dapat mempengaruhi kebenaran algoritma.  Pemilihan bentuk pengulangan yang tepat bergantung pada masalah yang akan diprogram.

·         Struktur pengulangan dengan For…To…Do
Contoh ;
Uses crt;
Var i : integer;
Begin
  For I := 1 to 100 do
Writeln(‘Looping’);
End.

Pada program diatas kalimat “Looping” diulang sebanyak 100x dengan menggunakan perintah “For I := 1 to 100 do” dimana pengulangan akan terus terjadi selama nilai dari I belum terpenuhi.

·         Struktur pengulangan dengan While…Do
Contoh :
Uses crt;
Var a : integer;
Begin
  A := 1;
  While a <= 5 do
Begin
  Clrscr;
  Writeln(‘Looping’);
A := a +1 ;
End;
Readln;
End.

Pada program diatas kalimat “Looping” akan sebanyak 5 kali dengan menggunakan” While a <= 5 do
“ dimana pengulangan akan terjadi selama A kurang dari sama dengan 5.

0 komentar:

Posting Komentar