Pascal语言程序设计概述Word下载.docx

1、能适用于数值运算和非数值运算领域。 PASCAL的功能较强，能广泛应用于各种领域 。PASCAL程序的书写格式比较自由三、Pascal语言程序的基本结构任何程序设计语言都有着一组自己的记号和规则。PASCAL语言同样必须采用其本身所规定的记号和规则来编写程序program ex_1; 程序首部 const pi=3.14159; 说明部分 常量说明 var r,c,s:real; 说明部分 变量说明 begin r:=3; 圆的半径 c:=2*pi*r ; 求周长C s:=pi*r*r ; 求面积S writeln（r=,r, c=,c, s=,s）; 输出周长面积 readln; end.其

2、中 r、c、s 称为变量从这个简单的程序解释PASCAL程序的构成.四、pascal的基本语法单位 1、基本符号 AZ；az；09；+，-，*，/，=，=，（，），:=，；，.，：，.， 注意：pascal语言除了能使用以上规定的基本符号外，不得使用任何其它符号。 五、Pascal语言中的关键字和标识符P6-P7六、Pascal语言中的常量与变量（一）、常量在程序运行过程中，其值不能被改变的量称为常量。如123,145.88,abc,true等。（1）整型常量 （integer）范围 -32768-32767（2）实型常量实型常量包括正实数、负实数和实数零。pascal中表示实型常量的形式有两

3、种。十进制表示法这是人们日常使用的带小数点的表示方法。如0.0,-0.0,+5.61,-8.0,-6.050等都是实型常量，而0.,.37都不是合法的实数形式。科学记数法科学记数法是采用指数形式的表示方法，如1.25105可表示成1.25E+05。在科学记数法中，字母“E”表示10这个“底数”，而E之前为一个十进制表示的小数，称为尾数，E之后必须为一个整数，称为“指数”。如-1234.56E+26 , +0.268E-5 , 1E5是合法形式，而.34E12 , 2.E5 , E5 ,E,1.2E+0.5都不是合法形式的实数。（3）字符常量字符常量是由单个字符组成，如：a，A，0等。特殊地，对

4、于单引号字符，则要表示成。对于ASCII字符集中，按每个字符在字符集中的位置，将每个字符编号为0255，编号称为对应字符的序号。（4）布尔常量布尔型常量仅有两个值，真和假，分别用标准常量名true和false表示。它们的序号分别为1和0。（5）符号常量：一个常量即可以直接用字面形式表示（称为直接常量， 如 124,156.8），也可以用一个标识符来代表一个常量，称为“符号常量”。但符号常量必须在程序中的说明部分定义，也就是说先定义，后使用。定义符号常量的一般格式:CONST=说明：常量说明部分以关键字const开头, 后面的标识符为常量标识符，其中“=”号后的常量为整数、实数、字符、 字符串（

5、字符、字符串常量在后面章节中将作介绍）。而且，在常量说明部分可以将几个常量说明成符号常量，共用一个关键字“const”。关于符号常量，应注意下列几点：符号常量一经定义，在程序的执行部分就只能使用该常量标识符，而不能修改其值。使用符号常量比直接用数值更能体现“见名知义”的原则，也便于修改参数，故一个较好的程序中，应尽量使用符号常量，在执行部分基本上不出现直接常量。（二）变量：变量代表了一个存储单元，其中的值是可变的，故称为变量。变量有三个要素是：变量名、变量类型、变量值。1变量名用一个合法的标识符代表一个变量。如n,m,rot,total 等都是合法变量名。在程序中用到的变量必须在说明部分加以说

6、明，变量名应遵循自定义标识符的命名规则，并注意“见名知义”的原则，即用一些有意义的单词作为变量名。2变量的类型常量是有类型的数据，变量在某一固定时刻用来存放一个常量，因此也应有相应的类型。如整型变量用来存放整数，实型变量用来存放实数。3变量说明在程序中若要使用变量，变量的名称及类型在程序的变量说明部分加以定义，变量的值则在程序的执行部分中才能赋给。变量说明的一般格式：VAR变量标识符,;（中括号内部分表示可省,下同）其中VAR是pascal保留字,表示开始一个变量说明段, 每个变量标识符或由逗号隔开的多个变量标识, 必须在它的冒号后面说明成同一类型。一个程序中，可以说明许多不同类型的变量，每种

7、类型变量之间用分号隔开，共用一个VAR符号。例如:varage,day:integer;amount,average:其中，Integer（整型）、Real（实型）是标准标识符， 它们是“类型标识符”，代表了确定的类型，如age和 day 被定义为整型变量，amount和average被定义为实型变量。一旦定义了变量，就确定了它的类型，也就是说，就确定了该变量的取值范围和对该变量所能进行的运算。六、Pascal语言中的表达式 a+b/（c+d） 1/（1+1/（2*3.14159） a*a*a七、Pascal语言中的数据类型P11P121、整型（integer） 正、负整数和零 maxint=

8、32767范围：-3276832767运算：+、*、div（整除） mod（求余）2、实型（real） 小数表示法、指数表示法2.9E-391.7E38+、*、/（实数除）算术运算符的运算次序： （ ） 函数 *、/、div、mod + 、八、常量和变量的定义常量的定义：pi=3.14159；变量的定义：VAR r,l,s:real； a:integer；a是一个两位数，求个位数和十位数 a mod 10 （个位） a div 10 （十位）*PASCAL 语言系统的启动 （1）开机启动WINDOWS98 （2）双击桌面上PASCAL图标即可启动PASCAL系统* 程序的输入、保存 （1）文件

9、的存盘： 拉下file菜单（按Alt+F），选择save 或 save as （2）输入文件名：ex1，点击OK* PASCAL程序的运行 拉下run菜单（按Alt+R），选择run 查看运行结果：Alt+F5* PASCAL 语言系统的退出 拉下file菜单（ 按Alt+F） ，选择exit 退出PASCAL 系统。 输入下列几个程序并保存程序、运行程序，观察程序的运行结果。=10;=2*pi*r;=pi*r*r; writeln（r,c,s）； writeln（r=,r, c=,c, s=,s）; writeln（r：8：2,c：2,s:8:2）;,r:5:2,c:,s:program E

10、x1; 输入程序 var i,j: 保存程序 begin 运行程序 for i:=1 to 9 do 输错了如何修改？ write（ :30）; for j:=1 to i do* writeln; end;program Ex3;=1 to 9 do30-i）;=1 to i*2-1 do end. program Ex2; write（i,j,=,i*j:第二章 简单程序设计一、教学目的1、让学生进一步了解算法的概念、程序设计思想和方法。2、让学生掌握顺序结构的程序设计。4、 让学生学会用Pascal语言设计简单的程序。一个完整的程序应该由输入、处理、输出三部分组成。上述求圆的面积、周长的

11、程序中以下三个语句叫做赋值语句。r:c:s:赋值语句 P13 格式：变量：表达式功能：计算表达式的值，并赋值给变量注意事项： “=”赋值号与数学中的等号意义不同。如：语句X=X+1表示将变量X的值加1后的结果值再赋给变量X，而不表示等号两边的值相等。 赋值号左边只能是变量，不能是数值或表达式。下面的写法是错误的：4=X+Y A+B/2=6一次只能给一个变量赋值，如果要给多个变量赋相同的值，只能使用多个赋值语句。将一个变量的值赋给另一个变量，前一个变量的值保持不变（变量的这种特性可概括为“取之不尽，后入为主”）。例如：SUM0I0 不能写成：SUMI0变量名的类型应与表达式的类型相容。所谓相容是

12、指变量名能够正确存取赋值号右边的表达式的值。 var a,b,c:b:=5;=a;=b; b:=c;执行上面程序后，变量a,b的最终值各是多少？ var a,b:=a+b;= a-b;=a-b;执行上面程序后，变量a,b的最终值各是多少?输出语句（write语句） p14格式： ：write（）； writeln（按指定的格式将输出项的内容输出writeln（r,c,s）； writeln（A+B=,A+B）;注：对real或integer限定场宽（自定义场宽） 向右靠齐，左留空格1.单场宽 writeln（a：5） ;a为整型2.双场宽 writeln（s：6：2） ;s为实型writeln

13、（r,c,s）；writeln（r：writeln（输入上述程序，观察程序的远行结果。从中体会write语句的格式及功能，并讲解。练习：1、.a=123,b=46,打印输出a+b的横式与竖式。 a+b=123+46=169 123 + 46- 169 输入语句（read语句） read（ readln（Y”是否成立，其结果不是一个数值，而是“成立”或“不成立”，也可以用“真”表示“成立”，用“假”表示“不成立”，也就是说，它的结果是一个逻辑值（“真”或者“假”），其实这种逻辑判断在日常生活中是经常遇到的，例如：人家问你“你是高中生吗？”，回答只能是“是”或“否”。实现逻辑运算是计算机的一个非常

14、重要的功能，逻辑判断又叫布尔运算，是英国数学家布尔（Bool）提出的。最基本的逻辑运算按次序运算分为：Not（逻辑非）and（逻辑与）or（或）1） not逻辑非： 对逻辑值取反。2） and逻辑与： 只有两个表达式同为真时，值为真，否则都为假。3） or逻辑或： 只有两个表达式同为假时，值为假，否则为真。要表示 1x1 and x10 或者x10 or x0 then writeln（a0）program ex9; var a:a=readln（a）; if a else writeln（a这个语句就叫条件判断句。2、 选择结构语句一 N Yif语句（条件判断句）简单if语句格式：格式一、I

15、F THEN 语句格式二、IF THEN 语句组 END IF格式三、IF 、=、=0、 x mod 2=0 、a+b=c、b*b-4*a*b=0 等，这样的式子称为关系表达式。判断a是否偶数？ if a mod 2=0 then writeln（Yes! begin write（a,b=readln（a,b）;b then writeln（a） else writeln（b）;三个数中找出最大的数的程序： var a,b,c,m:a,b,c=b then m:=a else m: if mc then m:max=,m）;课堂练习：1、行李托运p22X10 运费y=2.5+（x-10）*1.

16、52、三个数中找出最大的数，画框图并写程序（注重讲解算法）。逻辑表达式多条件用AND、OR、not将关系表达式连接起来的式子（称为逻辑表达式）来表示。（a+bc） and （a+cb） and （b+ca）构成三角形的充分必要条件、（a=b） and （b=c）等边三角形的条件、（a=b） or （b=c） or （a=c） 等腰三角形的条件 （A mod 400=0） or （a mod 4=0） and （a mod 1000）判断a是否闰年等，这样的式子称为逻辑表达式。二、块结构条件语句格式：if thenelse if 语句块2条件n语句块n else其它语句块end if问题：如何求

17、解一元二次方程的根？分析：要求解一元二次方程的根，需要已知a,b,c的值（aa） then p:=（a+b+c）/2;=sqrt（p*（p-a）*（p-b）*（p-c）;s= if （a=b） and （a=c） and （b=c） then writeln（It is Denbian else if （a=b） or （a=c） or （b=c） then writeln（It is DenyaoIt is Yiban endThat is wrong!end.练习1、月收入t的所得税税率r如下：t rT800 0800=t1000 5%1000=1500 10%1500=3000 20%编

18、写一个程序，输入某人的月收入，输出所得税税率、应缴所得税款以及扣除所得税后的实际收入（分别用if语句、if语句嵌套）。练习2、输入一个年号，判断它是否是闰年。三、case语句上面我们知道可以用嵌套的if语句实现多分支的选择结构。但是如果分支越来越多时，用嵌套的if语句实现多分支就显得繁杂。当多分支选择的各个条件由同一个表达式的不同结果值决定时，可以用case语句实现。它的选择过程，很象一个多路开关，即由case语句的选择表达式的值，决定切换至哪一语句去工作。因此在分支结构程序设计中，它是一种强有力的手段。在实现多路径分支控制时，用case对某些问题的处理和设计，比用if语句写程序具有更简洁、清晰之感。（一）、情况语句的一般形式：case 语句1;情况标号表2语句2;情况标号表n语句nend;其中case、of、end是Pascal的保留字， 表达式的值必须是顺序类型，它可以是整型、布尔型及以后学习的字符型、枚举型和子界型。情况标号表是一串用逗号隔开的与表达式类型一致的常量序列。语句可以是任何语句，包括复合语句和空语句。（二）、case语句的执行过程先计算表达式（称为情况表达式）的值，如果它的值等于某一个常量（称为情况常量，也称情况标号），则执行该情况常量后面的语句，在执