REPEAT UNTIL
berfungsi hampir sama dengan WHILE...DO. Pada REPEAT...UNTIL,
looping akan berhenti justru ketika kondisi bernilai TRUE. Selain itu kondisi akan diuji pada akhir perulangan sehingga blok di dalam perulangan akan dijalankan minimal satu kali walaupun kondisi yang ada masih FALSE.
Bentuk umum :
REPEAT statemen UNTIL ungkapan
Contoh program :
Var
I : integer ;
Begin
I : = 0 ;
Repeat
I : = I + 1 ;
Writeln (I) ;
Until I = 5;
End.
Output program :
1
2
3
4
5
Perbedaan antara struktur “ repeat until “ dengan “ while do “ adalah :
- Paling sedikit statemen-statemen dalam repeat until diproses sekali, karena seleksi kondisi ada pada statemen until yang terletak dibawah.
- Pada while do paling sedikit dikerjakan nol kali, karena seleksi kondisi ada pada statemen while yang terletak diatas, sehingga apabila kondisi tidak terpenuhi maka tidak akan masuk ke dalam lingkungan perulangannya.
- Pada repeat until dapat tidak menggunakan blok statemen ( BEGIN dan END ) untuk menunjukan batas perulangannya, karena batas perulangannya sudah ditunjukkan oleh repeat sampai dengan until.
