While..Do

Оператор цикла While содержит выражение, которое управляет повторением выполнения отдельного или составного оператора.

Объявление

While выражение Do оператор

Замечания

Оператор после Do будет выполняться до тех пор, пока булево выражение является истинным (True).

Выражение оценивается до выполнения оператора, так что если булево выражение с самого начала было ложным (False), то оператор не будет выполнен ни разу. (В отличие от оператора цикла Repeat)

Пример
 { Операторы While }
  While Ch = ' ' Do Ch:=GetChar;
 
  While Not EOF(InFile) Do
  Begin
   ReadLn(InFile, Line);
   WriteLn(OutFile, Line);
   Inc(LineCount);
  End;