Program Perulangan Pada Delphi

1. Perulangan For To Do

For To Do adalah program yang berjalan dengan menggunakan suatu variable counter yang akan bertambah secara otomatis ketika perintah yang di ulang selesai.

Langkah pertama 
1. Buka aplikasi delphi
2. Pilih File - New - Console Application
3. Setelah muncul jendela project, ketikkan script seperti berikut :

4. Jalankan program dengan cara pilih icon Run/F9 pada keyboard maka tampilan seperti berikut ;

2. Perulangan Repeat-Until

Perulangan repeat until digunakan untuk mengulang suatu kondisi sampai (until) kondisi bernilai salah.

Bentuk Umum :

Repeat – Statement/penyataan — Until – – – ungkapan logika

Contoh Sederhana :

Langkah pertama 
1. Buka aplikasi delphi
2. Pilih File - New - Console Application
3. Setelah muncul jendela project, ketikkan script seperti berikut :

4. Jalankan program dengan cara pilih icon Run/F9 pada keyboard maka tampilan seperti berikut ;

Contoh Lain ketikkan script seperti berikut :

Jalankan program dengan cara pilih icon Run/F9 pada keyboard maka tampilan seperti berikut ;

3. Perulangan While-Do

Perulangan While Do adalah statement perulangan akan terus melakukan suatu proses selama kondisi/syarat yang ditentukan bernilai benar.

Bentuk Umum

Statement While – Variabel Syarat – Do Pernyataan

Langkah pertama 
1. Buka aplikasi delphi
2. Pilih File - New - Console Application
3. Setelah muncul jendela project, ketikkan script seperti berikut :

4. Jalankan program dengan cara pilih icon Run/F9 pada keyboard maka tampilan seperti berikut ;