OI爱好者（OIFans.cn）

OI爱好者（OIFans.cn）
www.oifans.cn 

　　case语句是由一个表达式和众多可选择的操作序列组成。运行时，根据表达式的求值结果，在众多的分支中选取一个分支执行。其形式为：
　　　　case　表达式　of
　　　　　常量1：语句1；
　　　　　常量2：语句2；
　　　　　……
　　　　　常量n：语句n；
　　　　　else　语句 n+1 ｛可选项｝
　　　 end;
　　表达式只能是顺序类型（除了实型以外的简单类型），其值必须是唯一确定并且和表达式类型相同。case语句执行和表达式值相匹配的case常数所指向的那条语句，如果没有相匹配的值，则执行else部分（如果有的话）或者什么也不做。在else前面的语句末尾有分号，这是和if语句不同的。

  例：根据学生的成绩给予相应的等低，对应关系如下：
　　90-100   A
　　80-89    B
　　60-79    C
　　60以下    D
　program chengji;
　　var s:real;ch:char;
　begin
　　write(‘input the score: ‘);
　　readln(s);
　　if(s>=0)and(s<=100)then 　　　case s div 10 of 　　　　10,9:ch:='B'; 　　　　8:ch:='B'; 　　　　7,6:='C'; 　　　　else ch:='D'; 　　　end; 　　writeln(s,'-',ch); 　end.