Perulangan For Pada Pemrograman Delphi


Perulangan For digunakan untuk perulangan yang jumlah perulangan sudah diketahui. Perulangan ini akan melaksanakan blok program beberapa kali sesuai dengan nilai awal dan nilai akhir yang sudah ditentukan. Bentuk umum dari perulangan for adalah sebagai berikut :
for < pencacah > := < awal > to < akhir > do < pernyataan >
atau
for < pencacah > := < awal > downto < akhir > do < pernyataan >

Pada bentuk diatas, pencacah merupakan variabel bertipe bilangan bulat, bisa berupa integer, longint, byte dan sebagainya. Pencacah tidak dapat digantikan dengan pernyataan, karena nilai pencacah haruslah bisa ditambahkan (increment) atau dikurangkan (decrement).
Dari dua bentuk diatas, bentuk pertama akan melakukan penambahan dari nilai awal sampai nilai akhir, perulangan akan berhenti jika nilai pencacah lebih besar dari nilai akhir. Sedangkan pada bentuk kedua akan melakukan pengurangan dari nilai awal sampai nilai akhir, sehingga perulangan akan berhenti jika nilai pencacah lebih kecil dari nilai akhir. Dari kedua bentuk diatas, penambahan atau pengurangan yang dilakukan adalah senilai 1.
Untuk lebih jelasnya perhatikan contoh berikut :
for i := 1 to 10 do
    writeln (“nilai i =”+inttostr(i));

Potongan program diatas akan menampilkan nilai i, yang mana nilai i kan bertambah secara berulang hingga nilainya lebih dari 10. Prosesnya adalah seperti berikut :
a.    Variabel pencacah adalah i dan nilai awal adalah 1
b.    Selama i bernilai 1 sampai dengan 10 maka tampilkan “nilai i = i”
c.    Hasil dari program diatas adalah :
nilai i = 1
nilai i = 2
nilai i = 3
...
nilai i = 10

Contoh diatas merupakan perulangan menggunakan penambahan, sedangkan perulangan dengan pengurangan adalah sebagai berikut :
for i := 10 downto 1 do
    writeln (“nilai i =”+inttostr(i));

Potongan program diatas akan menampilkan nilai i, yang mana nilai i kan berkurang secara berulang hingga nilainya kurang dari 1. Prosesnya adalah seperti berikut :
d.    Variabel pencacah adalah i dan nilai awal adalah 10
e.    Selama i bernilai 10 sampai dengan 1 maka tampilkan “nilai i = i”
f.     Hasil dari program diatas adalah :
nilai i = 10
nilai i = 9
nilai i = 8
...
nilai i = 1

sumber :
-  Panduan Lengkap Pemrograman Borland Delphi 5.0, Penerbit Andi, 2001.

baca juga :
perulangan while do delphi
pernyataan case of delphi
pernyataan if else pada delphi
Previous
Next Post »