REPETISI-FOR

Repetisi, perulangan (looping) merupakan bentuk yang sering di temui dalam suatu program aplikasi. Didalam bahasa pascal, dikenal 3 macam perulangan, yaitu dengan manggunakan statemen For, While-Do, Repeat .... Until.



1. Struktur Perulangan FOR
Perulangan dengan statement For di gunakan untuk mengulang statemen atau satu blok statemen berulang kali sejumlah yang ditentukan. Perulangan dengan statemen for berbentuk perulangan positif, perulangan negatif dan perulangan tersarang. Sintak dari statemen For dalam bentuk diagram adalah sebagai berikut:

1.1 FOR TO DO :

—penghitung (counter) dari kecil ke besar
dibentuk dengan menggunakan statemnt For-To-Do, dengan bentuk umum:
—For (variabel-kontrol) := (nilai-awal) To (nilai-akhir) Do (statemen)

CONTOH:

Var
I : integer;
Begin
Clrscr;
For i = 1 to 5 Do
Begin
writeln(‘Paschal’);
End;
End.

1.2 FOR DOWNTO DO :

penghitung (counter) dari besar ke kecil
dengan menggunakan satemen For-Downto-Do, dengan bentuk umum:
For (variabel kontrol) := (nilai awal) DownTo (nilai-akhir) Do (Statemen).

CONTOH:
Var
I : integer;
Begin
For i = 5 DownTo 0 Do
Begin
writeln(i);
End;
End.

1.3 NESTED LOOP

perulangan yang berada didalam perulangan yang lainnya.
Perulangan yang lebih dalam akan di proses terlebih dahulu sampai habis, kemudian perulangan yang lebih luar baru akan bertambah, mengerjakan perulangan yang lebih dalam lagi mulai dari nilai awalnya dan seterusnya.

CONTOH:

Var
I,J : integer;
Begin
For I := 1 to 5 Do
Begin
For J := 1 to 3 Do
Begin
write (I:8,J:3);
End;
Writeln;
End;
End.