Pengulangan adalah ekspresi atau pernyataan boolean yang harus dipenuhi agar proses pengulangan dilakukan atau dihentikan. Badan pengulangan Adalah (sekelompok) aksi atau proses yang akan diulang
Pengulangan While-Do
Pengertian While berarti selagi/ selama dan do berarti lakukan. Jadi, while-do artinya struktur pengulangan dimana selama kondisi ( persyaratan ) pengulangan masih benar, maka aksi dikerjakan.
Contoh
uses crt;
var a:integer;
beginwhile(a<=10) do
Begin
writeln(a);
inc(a);
end;
readln;
end.