条件语句
if <条件表达式> then
<语句1>
else
<语句2>
选择语句
Case 选择表达式 of
常量1:语句1;
...
常量n:语句n;
Else
...
End;
循环语句
While
While 条件表达式 do
循环语句;
例：
while i < n do
begin
sum := sum+i;
i := i+1;
end;
Repeat
repeat 循环体
until 条件表达式
例：
repeat
i := i+1;
sum := sum+i;
until i = n;
for语句
for 计数器 := 初值 to/downto 终值 do
循环体
例：
for i := 1 to/downto n do
writeln('hello delphi');
for...in
for v in set do
循环体
例：
var
myset :set of AnsiChar;
ch : AnsiChar;
begin
myset := ['1','2'];
for ch in myset do
writeln(ch);
end.
for in还可以遍历数组、字符串、类、接口、记录
跳出语句
break，continue，abort，exit，halt，runerror
break 强制退出最近的一层循环（注意：只能放在循环里；而且是只能跳出最近的一层循环），用于从for、while、repeat语句中强制退出
continue 用于从for、while、repeat语句中结束循环内的本次处理,继续从循环体的开始位置继续执行
exit 用于从当前代码块中退出。若该代码是主程序，则终止该程序。如果是函数或过程，则立即终止该函数或过程
abort 终止程序需的运行，产生不报错的异常信息。跳出祖先模块。
procedure f1;
begin
f2;
f3;
end;
procedure f2;
begin
abort; //或者exit;
end;
procedure f3;
begin
//进行一些操作
end;
在执行f1的时候，如果f2里面用abort，则执行不到f3
如果使用exit，就能够执行到f3，因为exit只能控制终止它所在的函数或过程，不能终止调用它所在函数的那个代码块。
如果用exit终止它所在的那个函数之后，会跳回调用这个函数的代码块，继续执行之后的代码
halt 用于强行终止应用程序的执行，返回操作系统（非正常退出方式）。
runerror 终止程序的执行，并产生运行错误（返回错误代码）。
