Pernyataan While

 Pernyataan while biasa dipakai untuk melakukan pengulangan yang jumlahnya tidak diketahui di depan atau selang pencacah tidak sebesar 1 atau -1, sehingga pernyataan akan dilakukan terus menerus selama kondisi bernilai true bentuk pernyataan while :

While kondisi DO pernyataan 

Contoh program pernyataan while:

Program Cobawhile_1;

Uses crt;

Var

ulang : integer;

Begin

Clrscr;

ulang := 10;                   

While ulang >=1 do

Begin

Writeln(ulang);

ulang := ulang -1;

End;

Readln;

End.