logo
  • 教程列表
  • SO官方文档
  • 循环
    • 在循环中打破并继续
    • 重复,直到
    • 一边做
  1. StackOverflow 文档
  2. Embarcadero Delphi 教程
  3. 循环
  4. 在循环中打破并继续

在循环中打破并继续

Created: November-22, 2018

program ForLoopWithContinueAndBreaks;

{$APPTYPE CONSOLE}

var
  var i : integer;
begin
  for i := 1 to 10 do
    begin
      if i = 2 then continue; (* Skip this turn *)
      if i = 8 then break;    (* Break the loop *)
      WriteLn( i );
    end;
  WriteLn('Finish.');
end.

输出:

1
3
4
5
6
7
完成。

  • 重复,直到
  • 循环

Copyright © 2018. All right reserved

tastones.com 备案号:鲁ICP备18045372号-1

  • 关于我们
  • 免责声明