1、布尔表达式和选择结构,陈旭龙,基本运算符一览表,关系运算符,注意：其运算结果只能为True或False,下面表达式的运行结果： 210,设x为整型变量 表示x大于10的表达式为：表示x小于60的表达式为：表示x既大于10且小于60的表达式为：,x10,x60,(x10) and (x60),逻辑运算符,逻辑运算符,写出表达式,整数x是偶数写出一个数x既能被3整除又能被5整除的表达式y是闰年年份数（闰年的判断方法：能够被4整除且不能被100整除，或者能被400整除）,x mod 2=0,(x mod 3=0) and (x mod 5=0),(y mod 4=0) and (y mod 1000
2、) or (y mod 400=0),运算符的优先级,1、内层小括号先计算 2、函数先求值 3、单目运算符（,not） 4、乘的关系双目运算符（*,/,div,mod,and） 5、加的关系双目运算符（,or） 6、关系运算符（,=,=,in） 在同级运算中，按从左到右的顺序计算。,表达式,(1)算术表达式：算术表达式是由算术运算符连接常量、变量、函数的式子。 (2)布尔表达式：Pascal提供给布尔表达式以下基本操作：逻辑运算和关系运算。 一个单独的变量或常量也是表达式。如a、a+3、a*3+b都是表达式。,选择语句,语句格式,格式1：if 布尔表达式 then 语句； 格式2： if 布尔
3、表达式 then 语句1 else 语句2；,if语句不能写成： if 布尔表达式 then； 语句1； 这样语句不会出现语法错误，但由于then后的“；”代表了一个空语句，因此无论布尔表达式的值如何，都将执行语句1。,例题1,输入一个整数，判断它是否为偶数，如果是，则输出“yes”，否则输出“no”。,program 1; var a:integer; beginreadln(a);if then writeln(yes)else writeln(no); end.,a mod 2=0,练习1,1、输入一个数，如果该数可以被3整除或者可以被5整除，则输出“YES”，否则输出“NO”。2、输入
4、一个年份，判断是不是一个闰年，如果是闰年，则输出“leap year”，否则输出“nonleap year”。3、某超市举行购物优惠活动：所购物品不超过100元时，按九折付款，如超过100元，超过部分按六折收费。请你编一程序完成超市自动计费的工作。输入只有一个整数M，表示购物的款数。输出打折后的款数（ 结果保留两位小数）。4、老张有x元钱，打算存入银行两年。可以有两种储蓄方法:一种是存两年,年利率是4.50%;一种是先存一年，年利率是3.87%，到期时再把本金和税后利息取出来合在一起，再存一年。老张选择哪种储蓄方法得到的利息多？请编程，由键盘输入x，如果是第一种方法好，输出1，若是第二种方法好
5、，则输出2。,复合语句,概念：是由若干条语句组成一个语句块，这个语句块被作为一条语句。格式说明：用begin开头end结束，将若干语句括起来。之间的语句用分号“；”分隔。,例子： begintemp := a;a := b;b :=temp; end；,例题2,由键盘输入两个数a,b，将大数存于a中，小数存于b中，再输出变量a,b的值。,Program day2_3; var a,b,t: integer; begin readln(a, b); if ab then begin end; writeln(max=, a); writeln(min=, b); end.,t := a; a :
6、= b; b := t;,练习2,1、读入三个不同的整数，编程按由小到大的顺序排列打印出来。2、输入三条边a,b,c，判断其能否组成三角形，如果可以则输出yes，否则输出no。3、某车站行李托运收费标准是：10公斤或10公斤以下，收费2.5元，超过10公斤的行李，按每超过1公斤增加1.5元进行收费。 试编一程序，输入行李的重量，算出托运费。 输入样例1：5 输出样例1：2.50 输入样例2：11 输出样例2：4.00,If语句的嵌套,在if语句中，如果then或else后的语句又是一个if语句，叫做if语句的嵌套。 Else和最近的then配对。 if 布尔表达式 then 语句1 else
7、语句2；,If a b then if bc then x:=x+1 else x:=x-1;,If a b then a:=1else if a=b then a:=0else a:=-1;,嵌套例子,编程计算函数f(x)的值。 10 x=1 f(x)= 40 x=2 50 x1和x2,练习,1、输入某学生的成绩，若成绩在85分以上，输出very good，若成绩在60分到85分之间，输出good，若成绩低于60分，输出no good。2、输入两个正整数a，b。b最大不超过三位数，a不大于31。使a在左，b在右，拼接成一个新的数c。例如：a2，b16，则c216；若a18，b476，则c18
8、476。 提示：求c的公式为：caKb 其中： 输入样例：2 16 输出样例：216,多路选择结构,Case 表达式 of 常量表1：语句1； 常量表n：语句n； else 语句n+1 end; 格式说明：常量表为有序类型数据。表达式要与常量类型一致。 常量后的语句为一条语句。如果要完成多条语句功能，要将这些语句写成复合语句。,注意事项,Case语句执行表达式值相匹配的case常量所指向的那条语句，如果没有相匹配的值，则执行else后的语句n+1或什么也不做（无else语句）。 Case常量必须惟一确定且必须与表达式同类型，每一个常量只能在常量表中出现一次且仅出现一次。 表达式只能是充数类型。
9、序数类型包括整型、字符型、布尔型、枚举型、子界型。,例题,模拟一个简单的计算器，即输入两个数和一个算符（加、减、乘、除），输出运算结果。 输入： 12 24 + 输出： 36,Program exam5_4; Var a,b,c:integer; ch: char; begin readln(a,b); readln(ch); case ch of +: c := a + b;-: c := a - b; *: c := a * b; /: c := a div b; end;writeln(c); end.,求天数,【描述】输入年份和月份，求当月有多少天。注意，闰年的判断方法为能被4整除且不能被100整除，或者能被400整除。 【输入说明】输入两个数yy和mm，代表年份和月份。 【输出说明】输出当月的天数。 【输入样例】2010 2 【输出样例】28,网站练习题,P1099 数据交换 P1100 购物 P1101 成绩分级 P1102 四则运算 P1103 合并数字 P1104 求天数,
