Оператор цикла с предусловием на языке Паскаль имеет вид WHILE ... DO. Перед каждым выполнением тела цикла проверяется условие. Если условие истинно, тело цикла выполняется. Если условие ложно, цикл завершается. Тело цикла может не выполниться ни разу, если условие изначально ложно.
Формат записи:
WHILE условие DO
BEGIN
операторы_тела_цикла
END;
Пример: Вывод чисел от 1 до 5.
VAR
i : Integer;
BEGIN
i := 1;
WHILE i <= 5 DO
BEGIN
Write(i, ' ');
i := i + 1;
END;
END.
Ответ: Оператор WHILE ... DO. Пример: вывод чисел от 1 до 5.