Struktur Perulangan (Looping)

Adalah struktur yang mengulang pelaksanaan sederet instruksi sampai batas tertentu. Struktur perulangan terdiri atas :
Kondisi perulangan, yaitu suatu kondisi yang harus terpenuhi agar perulangan dapat terjadi.
Badan atau body perulangan, yaitu sederet instruksi yang di ulang sampai batas tertentu.
Pencacah atau counter perulangan, yaitu variable
Ada tiga macam bentuk perulangan :
1. While – do
2. Repeat - until
3. For
Contoh

Mengurangkan bilangan 20, berturut-turut dengan bilangan 6 sampai dengan bilangan = 2

Sturktur
1. While do
While kondisi do


Begin
Instruksi
End
Contoh
Program ulang 1
Uses crt;
Var
Bil : integer;
Begin
Bil := 20;
While bil > 2 do
Begin
Bil := bil – 6;
Write (‘bil’);
End;
Readln;
End.

2. Repeat until

Repeat

Instrurksi


Until kondisi


End


Contoh
Program ulang 2
Uses crt;
Var
Bil : integer;
Begin
Bil := 20;
Repeat
Bil := bil – 6;
Write (‘bil’);
Until bil > 2;
Readln;
End


3. For
For var asal to var akhir do



Instruksi




End
Contoh
Tulis
‘ saya akan rajin belajar sebanyak 300 kali’
For var asal to var akhir do
Instruksi
End;
Program ulang 3
Uses crt;
Begin
Clrscr;
For 1 to 300 do
Write(‘saya akan rajin belajar sebanyak 300 kali’);
End;
Readln;
End.