Pascal-决策

简介

Pascal语言是一种使用范围广泛的高级程序设计语言，最初由Niklaus Wirth在1970年代中期开发。Pascal由于其易学易用以及代码清晰、结构化等特点，在教育领域和应用软件开发领域都有广泛应用。

在Pascal中，决策结构是控制程序流程的重要手段，程序员可以使用不同类型的决策结构来根据条件判断执行不同的语句。

决策结构

if语句

如果要判断某个条件是否成立，可以使用if语句。

if condition then
   statement;

其中，condition是一个布尔表达式，如果结果为true，那么将执行跟在这个if语句后面的那个语句；否则，将跳过这个语句。

if语句还可以加上else分支：

if condition then
   statement1
else
   statement2;

如果condition为true，那么将执行statement1；否则将执行statement2。

case语句

case语句是一种多路分支结构，它可以根据变量的不同取值执行不同的操作。

case expression of
   value1: statement1;
   value2: statement2;
   ...
   else statementN
end;

在这个语句中，expression是一个表达式，value1、value2等是常量值，如果expression的值等于其中某个常量值，那么会执行该常量值后面的语句；否则，执行else部分的语句。

实例

以下是一个使用Pascal语言实现的判断一个数是奇数还是偶数的程序：

program OddEven;

var
   num: integer;

begin
   write('请输入一个整数：');
   readln(num);
   
   if (num mod 2) = 0 then
      writeln(num, '是偶数。')
   else
      writeln(num, '是奇数。');
      
   readln;
end.

当用户输入一个数时，程序会首先执行if语句，判断输入的数num是否为偶数，如果是，那么输出该数是偶数；否则，输出该数是奇数。程序执行完后，会等待用户按回车键退出。