continue break

//建立1个ConsoleApplication 把代码往里面粘贴

/////////////////////////////////////////////////////

{break}

program Project1;
{$APPTYPE CONSOLE}
uses
  SysUtils;
var i:Integer;
begin
{break在各循环中调用Break，可以使得程序的执行流程立即跳到循环的结尾。}
  for I:=1 to 10 do
  begin
    if I=5 then Break;
    Writeln(i);
  end;
  Readln;
end.

/////////////////////////////////////////////////////

{Continue}

program Project1;
{$APPTYPE CONSOLE}
uses
  SysUtils;
var i:Integer;
begin 
 {continue}
  for I:=0 to 10 do
  begin
    if i=3 then Continue;//=这个数就跳过
    Writeln(IntToStr(I));
  end;
  Readln;
end.

//////////////////////////////////////////////////////////////////////////

 

通过 Wiz 发布