while условие do
// здесь инструкции, которые будут выполняться до тех пор,
// пока условие истинно
end;
Где:
условие – простое или сложное условие выполнения инструкций, находящихся между словами do и end.
Пример:
i := 1;
while i <= 10 do
writeln(i:2, ' Hello, World!');
i := i + 1;
end;
Цикл
Repeat
Инструкция цикла Repeat (цикл с постусловием) в общем виде записывается так:
repeat
// здесь инструкции, которые будут выполняться до тех пор,
// пока условие ложно
untilусловие;
Где:
условие – простое или сложное условие завершения цикла (прекращения выполнения инструкций, находящихся между словами repeat и until).
Пример:
i := 1;
repeat
writeln(i:2, ' Hello, World!');
i := i + 1;
until i > 10;
Инструкция Goto
Инструкция goto (безусловный переход) в общем виде записывается так:
gotoметка
Где:
метка – идентификатор инструкции, к которой необходимо выполнить переход.