Un while statement est utilisé pour répéter un statement ou un bloc tant qu'une condition (expression) est évalué à vraie. La condition est évalué avant le statement, cela veut dire que si la condition est évaluée à fausse au premier passage, le statement n'est jamais exécuté
Exemples:
while Data[I] <> X do I := I + 1;
while I > 0 do
begin
sleep(10);
if Odd(I) then Z := Z * X;
I := I div 2;
X := Sqr(X);
end;
while not Eof(InputFile) do
begin
Readln(InputFile, Line);
Process(Line);
end;
Dans chaque while statement, il faut impérativement ajouter le statement SLEEP(10) pour ne pas bloquer le système.