当前位置:首页 >> 初中教育 >>

(8)选择语句一


PASCAL程序设计
第三章 程序的选择结构
简单的if语句 P34

一、关系运算符和关系表达式 P36 关 系 运 算 符: =、 >、<、< >、 >=、<= 对应数学符号: =、 >、<、 ≠、 ≥、 ≤
关 系 表达式:8-2=5+2 9>4 5>3 9<

;>6 10<=2 关系表 达式的值:假(F) 真(T) 真(T) 真(T) 假(F)

二、逻辑运算符和逻辑表达式

逻辑运算符: and 含 义: 逻辑与

P36 or not 逻辑或 逻辑非

逻辑表达式 表 关系表达式 达 B A AND B A OR B NOT A NOT B 式 A

表 达 式 的 值

真 真 真 假 假 真 假 假

真 假 假 假

真 真 真 假

假 假 真 真

假 真 假 真

二、逻辑运算符和逻辑表达式

P36
not 逻辑非

逻辑运算符: and 含 义: 逻辑与
关系表达式 关系表达式

or 逻辑或

逻辑表达式的值

(9 < 8) and (16 < 18)
逻辑表达式 假

(3>6)

and or not





(8<10) (5.1>5)

真 假

三、表达式内的运算顺序

算术运算

关系运算 逻辑运算

3 = 5 AND ( NOT 6 + 5 < 12 OR 3 > 2 ) ⑥ ① ③ ② 假 真 真 ④





NOT? AND ? OR

⑦ 假

逻辑表达式的值

括号、函数、乘方、乘、除(整除、求余)、加、减

思考题:
铁路托运行李,从甲地到乙地,不超过50千 克时,每千克运费为1.5元;如果超过50千克,超 出的部分按每千克运费托为2元,能否编一个自动 计价的程序?怎样编写?
设质量为M,运费为Y

分析、建模:
如果 则 否则 M≤50 Y=1.5×M Y= 1.5×50+2×(M-50)

图解:
输入M
T F

采集数据

M<=50

判断数据

Y=1.5*M

Y=1.5*50+2*(m-50) 处理数据 输出Y 输出数据

顺序结构

选择结构
开始
输入数据

开始 输入数据

处理数据
输出数据 结束

T
处理数据1

条件

F
处理数据2

输出数据

结束

流程图:用一些带方向的线条和图形形象 地描述某事物发展进程及各部分之间的关系。 流程图的符号:
框图符号 1 2 3 4 5 6 名称 流程线 起止框 处理框 判断框 输入输出框 连接框 功 能 表示流程的路径和方向 整个流程的开始或结束 处理或运算 框内标明判断条件,一个入口 , 两出口为条件成立与否流向 框内标明输入或输出的内容

表示此处下转(或上接)与本框所 注明内容相同的另一连接处

If语句

P38

1、单行结构条件语句 IF … THEN … ELSE …
格式:IF <条件> THEN <语句1> [ ELSE <语句2> ] 功能:用来进行条件判断,条件成立,执行语句1, 然后 转到下一语句;条件不成立,则执行语句2,继而 执行下一个语句 行。
条件 T 语句1 F

条件 T 语句1

F 语句2

IF <条件> THEN <语句1> ELSE <语句2>

IF <条件> THEN <语句1>

开始

输入M
T
Y=1.5*M

M<=50

F

Y=1.5*50+2*(M-50)

writeln(‘input M:’) ; readln(M); 输出Y if M<=50 then F=M*1.5 结束 else F=50*1.5+2*(M-50)*; writeln(’Y=’,Y); readln end.

程序:
Program xinli; var M : integer; Y : real; begin writeln(’ input M:’ ); read(M); if M<=50 then Y:=1.5*M else Y:=1.5*50+2*(M-50); writeln(’Y=’,Y) end.

例1: 任给定一年,判断该 年是否闰年。闰年条件是: 能被4整除但不能被100整除, 或者能被400整除。

开始 输入年份y 判断y T “是闰年” F

“不是闰年” program year ; var y:integer; 结束 begin write(‘input y); readln(y); if (y mod 4 =0 and y mod 100<>0) or (y mod 400=0) then writeln(y,’shi run nian’) else writeln(y,’bu shi run nian’) end.

例2:比较两个数的大小。键入A和 B 的值,如果A>B,就输出 开始 “@@@@”,否则输出 “########”。 Read(A,B)
Program cx; T F var A>B A,B : integer; begin Write(‘########‘) writeln(’ input A,B:’ ); Write( ‘@@@@‘) read(A,B); if A>B then writeln(’@@@@’) else writeln(’########’) 结束 end.

运行程序练习: 运行P39[例3.7]、[例3.8]程序。

编程练习: ?2 x ? 1 1、设计一个程序计算 y ? ? 2 x ? 1 ? 入x的值,输出y的值。

x?5 x?5

,要求键

2、某公司出售磁盘,购买50张以上者按每张 3.2元计价,否则按每张4元计价。请设计一个符 合上述规定的收费程序。

3、某校三好学生在学习方面的条件是:语、 数、外各科成绩不低于90分,或三科总分不低于 280分。编程将输入的学生是否符合条件。

program chlx8_1; var x,y:real; begin writeln('input x='); readln(x); if x>=5 then y:=2*x+1 else y:=2*x-1; writeln('x=',x:6:1,' y=',y:6:1); end.

program chlx8_2; var x:integer; y,z:real; begin writeln('input x='); readln(x); if x>=50 then y:=3.2*x else y:=4*x; writeln('x=',x,' y=',y:6:1); end.

program chlx8_3; var yw,sx,yy,zf:real; begin writeln('input yw,sx,yy=?'); readln(yw,sx,yy); if ((yw>=90) and (sx>=90) and (yy>=90)) or ((yw+sx+yy)>=280) then writeln('yes') else writeln('no'); end.

{求大数的平方} program chlx8_4; var a,b,y:real; begin write('input a,b='); readln(a,b); if a>b then y:=sqr(a) else y:=sqr(b); writeln(y); end.


相关文章:
8-C#语句8
8 8.7 选择语句 ... 9 8.7.1 if 语句...30 1. 语句 C# 提供了各种不同的语句。使用 C 和 C++ 编过程序的开发人员对这些语句中的大多 数将会非常熟悉...
将两个数a=8,b=17交换,使a=17,b=8,下面语句正确的一组是( )
将两个数a=8,b=17交换,使a=17,b=8,下面语句正确的一组是( )_答案解析_2013年数学_一模/二模/三模/联考_图文_百度高考
Java循环选择控制语句
Java 循环选择控制语句 算法 分支语句 循环语句 跳转语句 算法的特性: 1.有穷...{ int a=6; int b=8; if(a...
c# 语句详解
c# 语句详解_高等教育_教育专区。c# 语句详解包含 选择语句 跳转语句 try checked lock。。。8. 语句 8. 语句 8.1 终点与可达性 8.2 块 8.2.1 语句列表...
4c语言试卷8
语言程序设计试卷六 七八九总分 一 一、选择题(本大题共 15 小题,每题 2 分,共 30 分) 1. 以下选项中属于 C 语言的数据类型是( ) A.复数型 B ....
将两个数a=8,b=17交换,使a=17,b=8,下面语句正确一组是( )
将两个数a=8,b=17交换,使a=17,b=8,下面语句正确一组是( )_答案解析_2016年数学_一模/二模/三模/联考_图文_百度高考
已知a=8,b=17,现将两个数交换,使a=17,b=8,下面语句正确的一组是( )
已知a=8,b=17,现将两个数交换,使a=17,b=8,下面语句正确的一组是( ) ...把c的值赋给变量a,这样a=17. 故选C.最新上传套卷2016年高考模拟 理数 2015...
标准日本语初级上1-8单元所有的句子和单词——应对日语...
标准日本语初级上1-8单元所有的句子和单词——应对日语选修课,打印下来背就可以了。_日语学习_外语学习_教育专区。标准日本语初级上1-8单元所有的句子和单词——...
1--8册重点句子
小学1——8册句子 暂无评价 63页 免费 重点句子1 8页 5财富值 1-5重点句子 2页 免费 重点句子1 暂无评价 7页 免费 1四年级上册重点句子 1页 免费 初中文...
TC
第八章 TC 如果语句 8.1 如果语句 如果语句,也就是 如果 语句,用如果语句...第九章 TC 选择语句 9.1 选择语句 9 TC 语言还提供了另一种用于多分支选择的...
更多相关标签: