Break { simple statement }
With Break
you can exit the body of the current loop
instantly. It can only be used within a while
, repeat
or a for
loop.
Break
is a Borland Pascal extension. Mac Pascal has
Leave
instead.
program BreakDemo; var Foo: Integer; begin while True do begin repeat WriteLn ('Enter a number less than 100:'); ReadLn (Foo); if Foo < 100 then Break; { Exits `repeat' loop } WriteLn (Foo, ' is not exactly less than 100! Try again ...') until False; if Foo > 50 then Break; { Exits `while' loop } WriteLn ('The number entered was not greater than 50.') end end.