@lilla.herman Добрый день!
Для выхода из цикла используйте команду Berak
Пример:
1 2 3 4 5 6 7 8 |
var i: integer; ... i:= 0; while true do begin inc(i); if i= 10 then Break; end; |
Цикл бесконечный, но при i = 10 он будет завершен.
@lilla.herman
Внутри цикла while можно использовать оператор break для выхода из цикла в любой момент, если определённое условие выполнено. Например:
var i: Integer; begin i := 0; while i < 10 do begin if <условие> then break; // выход из цикла Inc(i); end; end;
Также можно использовать оператор exit для выхода из цикла из любой точки программы. Например:
var i: Integer; begin i := 0; while true do begin if <условие> then exit; // выход из цикла Inc(i); if i > 100 then exit; // выход из цикла из любой точки программы end; end;