While логическое_выражение do
оператор;
Рисунок 5 – Блок-схема цикла с предусловием
Единственный оператор, составляющий тело цикла, выполняется повторно до тех пор, пока логическое_выражениепринимает значение Тruе.
В качестве примера использования цикла с предусловием whileприведем программу, которая выполняет те же функции, что и программа, приведённая в предыдущем пункте (Пример использования оператора repeat).
Цикл while продолжает работать, пока логическое выражение будет иметь значение true, в отличие от цикла repeat, который продолжает работать, пока логическое выражение будет иметь значение false. Поэтому потребовалось изменить логическое выражение (условие окончания цикла): (x<-5) or (x=0).
Также следует обратить внимание на оператор x:=-10, который используется для того, чтобы цикл выполнился в первый раз. Вместо значения 10 можно использовать любое другое значение, позволяющее получить значение true при вычислении выражения (x<-5) or (x=0)(например: 11, 100, -3 и т. д.).
program rpt;