Pengulangan For To Do

Perulangan for dibagi menjadi dua, yaitu for...to...do dan for...downto...do. Format penulisan untuk fungsi pustaka for...to...do adalah sebagai berikut: for varibel_pengontrol := ekspresi1 to ekspresi2 do pernyataan
Variabel pengontrol adalah variabel yang dijadikan tempat menyimpan data untuk menentukan jumlah pengulangan. Ekspresi1 diisi dengan bilangan awal pengulangan dan ekspresi2 diisi dengan bilangan akhir. Ekspresi1 lebih kecil dari pada ekspresi2 (ekspresi1 <>). Dengan kata lain pengulangan for to do sama dengan prinsip kerja “up counter” pada pelajaran teknik digital. Amati listing program berikut:

Sintak program	Output
Program ContohFor_Do; {mencetak bilangan secara menaik} Uses Crt; Var i:byte; Begin ClrScr; FOR i:=1 to 5 DO Writeln(i); Writeln('Selesai'); End.	Tampilan 1: 1 2 3 4 5 selesai

Perhatikan pada bagian listing program yang menyatakan pengulangan sintak :
FOR i:=1 to 5 DO Writeln(i); Pernyataan Writeln(i); akan diulang sebanyak lima kali sesuai dengan nilai, yaitu i:=1 to 5. Setelah nilai i mencapai lima, maka sintak Writeln('Selesai'); baru akan dieksekusi sehingga hasilnya akan seperti pada output tampilan 1.

Format penulisan untuk fungsi pustaka for...downto...do adalah sebagai berikut:
FOR varibel_pengontrol := ekspresi1 DOWNTO ekspresi2 DO
pernyataan

Variabel pengontrol adalah variabel yang dijadikan tempat menyimpan data untuk menentukan jumlah pengulangan. Ekspresi1 diisi dengan bilangan awal pengulangan dan ekspresi2 diisi dengan bilangan akhir. Ekspresi1 lebih besar dari pada ekspresi2 (ekspresi1 > ekspresi2). Dengan kata lain pengulangan for downto do sama dengan prinsip kerja “down counter” pada pelajaran teknik digital. Amati listing program berikut:

Sintak program	Output
Program ContohFor_Do; {mencetak bilangan secara menaik} Uses Crt; Var i:byte; Begin ClrScr; FOR i:=5 to 1 DO Writeln(i); Writeln('Hasil perhitungan mundur'); End.	Tampilan 1: 5 4 3 2 1 Hasil perhitungan mundur

Dari listing tersebut tentunya sudah cukup jelas, perbedaan antara for to do dan for downto do.