FPC教程—分情况case语句.ppt

作业 必作1、某服装公司为了推销产品，采取这样的批发销售方案:凡订购超过200 套的，每套定价为50元，凡是订购超过100套，则每套定价65元，否则每套价格为80元。编程由键盘输入订购套数，输出应付款的金额数。 作业 必作2、 任意输入3个数，按由大到小的顺序输出。 分析：这道题是解决三个数排序的问题，假设把最大的数赋值给x，次者赋值给y，最小数赋值给z，需要分三步： 第一步，如果x小于y，则交换x、y，把较大的数赋值给x，较小的数赋值给y； 第二步，如果x小于z，则交换x、z，把较大的数赋值给x，较小的数赋值给z； 第三步，如果y小于z，则两者交换，较大的数赋值给y，较小的数赋值给z，则排序完成。 选作1、输入一个三位数的整数，将数字位置重新排列，组成一个尽可大的三位数。例如：输入213，重新排列可得到尽可能大的三位数是321。 成绩共分为4个等级，为了划分等级，需要将分段数进行处理：score div 10，也可以用trunc(x)为取整函数，是Pascal的算术标准函数之一，然后根据成绩高位（十位、百位）部分来判断其成绩等级，如95分十位是9，等级是A。 作业2：某车间按工人加工零件的数量发放奖金，奖金分为五个等级：每月加工零件数N 100者奖金为10元；100 = N 110者奖金为30元；110 = N 120 者奖金为50元；120 = N 130 者奖金为70元；N 130者为80元。请编程，由键盘输入加工零件数量，显示应发奖金数。 北京市育才学校 信息学第七课时 ——分情况（case）语句 主讲：冉 敏 2011.10 * 作业 例4-5 输入某同学的数学百分制成绩，要求输出成绩等级A、B、C、D。规定90分以上为A，80～89为B，60～79为C，60以下为D。 分析：此程序的功能就是自动划分出成绩的档次，此题将用到if语句的多层嵌套。输入成绩score，如果score=90,则为A，否则如果score =80，则为B，否则如果score =60，则为C，否则为D. program dengji(input, output); var score: real; begin writeln(‘please input the score:’); readln(score); write(‘deng ji shi:’); if score=90 then writeln(‘A’) else if score=80 then writeln(‘B’) else if score=60 then writeln(‘C’) else writeln(‘D’); end. * 分情况case语句 If语句只有两个分支可供选择,而实际问题中常常需要用到多分支选择结构. case语句是多分支选择语句.case语句的一般形式如下: case 表达式 of 常数表1: 语句1; 常数表2: 语句2; 常数表3: 语句3; …… 常数表n:语句n； else 语句n+1； end； * 说明 当表达式的值与常熟表中某一值相匹配，则执行其后面的相应语句；如果常数表中没有与表达式相匹配的常数，则执行else后面的相应语句。 else可以省略，此时若无表达式的值与之想匹配的常数表时程序将向下运行并跳出case语句。 保留字end与case成对出现，end表示case语句结束 表达式的类型通常是整型与字符型； 常数表示一个或一组常量，其类型与表达式类型一致。通常把可能性大的常数表列于前面，以加快程序运行的速度。 * 作业1 设计一个简单的计算器，具有加、减、乘、除功能。 分析：可以通过键盘输入两个要计算的数和运算符号，然后利用case语句功能根据输入的运算符（+ - * /）分四种情况进行处理。 * 北京市育才学校