Perulangan (Looping)

Terdiri dari :

1. For –do (Berhingga)

2. While-do (Berhingga)

3. Repeat-until(Tak berhingga menyatakan Kondisi)

Dalam perintah ini kita harus mengetahui :

Apa yang diulang ?

Kapan diulang ?

Kapan Berhenti Mengulang ?

Bentuk Umum

For – Do

For variabel := nilai awal to/down to nilai akhir do

Statement;

To untuk Nilai awal yang <= (lebih kecil atau sama) nilai akhir (bertambah-tambah 1)

Down To untuk Nilai awal yang >= (lebih besar atau sama) nilai akhir (berkurang-kurang 1)

Mengulang : jika nilai variabel belum melewati nilai akhir

Berhenti : jika nilai variabel sudah melewati nilai akhir

Contoh :

Buatlah program untuk menampilkan kalimat “ Sarang Tawon” sebanyak lima kali

Jawab

Uses crt;

Var

 Ulang : byte;

Begin

Clrscr;

For ulang to 5 do

Writeln(‘Sarang Tawon’);

Readln;

End.