Break and Continue Statement ( Delphi Tutorial # 14 )

Break

Break is a procedure to jump out or quit the looping statement (if, repeat or while). Break is usually called in an if statement.

Example :

program Project1;
{$APPTYPE CONSOLE}
uses
  SysUtils;

var
  number, stop : integer;
begin
  write('Conter will be stopped at : ');
  readln(stop);
  for number := 1 to 1000 do
    begin
      if number = stop +1 then break;
      writeln(number);
    end;
  readln;
end.

Continue

Continue is a procedure that is used for skipping to next iteration in a looping statement (if, repeat or while). It is also called in an if statement.

Example 1 (writing odd numbers from 1 to 20) :

program Project1;
{$APPTYPE CONSOLE}
uses
  SysUtils;

var
  number : integer;
begin
  for number := 1 to 20 do
    begin
      if Odd(number) then continue;
      writeln(number);
    end;
  readln;
end.

Example 2 (writing even numbers from 1 to 20) :

program Project1;
{$APPTYPE CONSOLE}
uses
  SysUtils;

var
  number : integer;
begin
  for number := 1 to 20 do
    begin
      if not Odd(number) then continue;
      writeln(number);
    end;
  readln;
end.

You can download the complete code here.

Go to Previous Tutorial or Next Tutorial