robsean@126.com QQ 群：192903718 2 / 4 If…Then…Else If 语句允许一个程序依据一个条件来做出一个决定。下面的示例要求用户输入一个数字，并 告诉你这个数字是否大于 5： Program Decisions; Var i:Integer; begin Writeln('Enter a number'); Readln(i); If i >5 Then Writeln('Greater than 5'); end. 下面是一个可以在条件中使用的比较运算符的表格。 符号 说明 > 大于 < 小于 >= 大于或等于 <= 小于或等于 = 等于 <> 不等于 上面的示例仅告诉你该数字是否大于 5。如果你想让它告诉你该数字不大于 5，那么我们使用 Else。当你使用 Else 时，你不能在 end.命令前放置分号 Program Decisions; Var i:Integer; begin Writeln('Enter a number'); Readln(i); If i >5 Then Writeln('Greater than 5') Else Writeln('Not greater than 5') end. 如果条件是 True，那么 Then 部分被选择。但是，如果条件是 False，那么 Else 部分被选择。这 是因为像 i>5 这样的条件是一个布尔等式。你甚至可以分配一个布尔等式的结果到一个布尔变 量。 robsean@126.com QQ 群：192903718 3 / 4 Program Decisions; Var i:Integer; b:Boolean; begin Writeln('Enter a number'); Readln(i); b:=i>5; end. 如果你想使用多个条件，那么你必需把每
