PASCAL程序设计基础.doc

课 题： 第四章 程序设计基础4.1程序设计概述一、为什么要学习及如何学习程序程序设计?（1）、培养兴趣兴趣是能够让你坚持下去的动力。如果只是把写程序作为谋生的手段的话，你会活的很累，也太对不起自己了。多关心一些行业趣事，多想想盖茨。（2）、慎选程序设计语言 男怕入错行，女怕嫁错郎。初学者选择程序设计语言需要谨慎对待。软件开发不仅仅是掌握一门编程语言了事，它还需要其他很多方面的背景知识。软件开发也不仅仅局限于某几个领域，而是已经渗透到了各行各业几乎每一个角落。 （参考P171和P224的计算机语言与软件技术的发展）（3）、要脚踏实地,快餐式的学习不可取（4）、多实践,快实践学习编程的秘诀是：编程、编程、再编程，笔者深表赞同。不仅要多实践，而且要快实践。（5）、万不得已才请教别人（6）、多读好书 书中自有颜如玉。比尔?盖茨是一个饱读群书的人。虽然没有读完大学，但九岁的时候比尔?盖茨就已经读完了所有的百科全书，所以他精通天文、历史、地理等等各类学科，可以说比尔?盖茨不仅是当今世界上金钱的首富，而且也可以称得上是知识的巨富。 参考文献Java学习之路：不走弯路，就是捷径二、程序设计的一般步骤1、 名词术语：程序设计：编写计算机程序的过程。算法：解决问题的计算方法；是指完成某一项工作的方法和步骤，是对解题过程的准确而完整的描述。【问题1】已知杯A和杯B，描述交换两个杯中液体的算法步骤1 把杯A的液体倒入空杯C中。步骤2 把杯B的液体倒入空杯A中。步骤3 把杯C的液体倒入空杯B中。【问题2】交换两个变量中的数据。已知变量x和y中分别存放了数据，现在要交换其中的数据。为了达到交换的目的，需要引进一个中间变量m，其算法如下： 将x中的数据送给变量m，即xm； 将y中的数据送给变量x，即yx； 将m中的数据送给变量y，即my。【问题3】两个大人和两个小孩一起渡河，渡口只有一条小船，一次只能渡过一个大人或两个小孩，他们四人都会划船，但都不会游泳。请写一写你的渡河方案。讨论回答。算法的描述方法：文字和流程图2、程序设计的一般步骤：（1）、分析问题 （2）、确定算法和数据结构 （3）、算法描述 （4）、编写程序代码及程序调试。三、算法的描述方法【问题4】输入三个不相同的数，求出其中的最小数。解题思路：先设置一个变量min，用于存放最小数。当输入a、b、c三个不相同的数后，先将a与b进行比较，把小者送给变量min，再把c与min 进行比较，若cmin，则将c的数值送给min，最后min中就是三个数中的最小数。算法的自然语言描述流程图问题2、4的描述流程图描述：流程图的概念：流程图是用一组几何图形表示各种类型的操作，在图形上用简明扼要的文字和符号表示具体的操作，并用带有箭头的流线表示操作的先后次序。算法描述方法的比较：（1）第一个算法描述方法的比较(语言描述法、流程图、程序)Var A,B,C:integer;BeginReadln(A,B);C:=A;A:=B;B:=C;Writeln(A,B);End.（2）第二个算法描述方法的比较(语言描述法、流程图、程序)用自然语言表示一般比较冗长，而且有“歧义性”（不同的人对不同的文字有不同的理解）。用流程图的好处是：直观形象，流程清晰；缺点占面积大，费时。【思考题】输入三个不相同的数，求出其中的最大数。请分别用语言、流程图、程序进行算法描述。四、N-S结构化流程图表示算法N-S结构化流程图的主要特点是取消了流程线，即不允许流程线任意转移，而只能是从上到下顺序执行。1、 顺序结构A块B块A块B块2、 选择结构条件PA块B块YESNOO条件PYESNOOA块 B块3、 循环结构（以后详讲）【问题2】交换两个变量中的数据。定义三个变量：A，B，C输入A、B的值A的值赋给CB的值赋给AC的值赋给B输出A、B的值【问题4】输入三个不相同的数，求出其中的最小数。定义4个变量a、b、c、min输入a、b、c的值abYNa的值赋给min b的值赋给mincc) and (b+ca) and (a+cb)计算l的值显示输入错误计算S的值输出S的值例6编程求一元二次方程ax2+bx+c=0的实数根。练习：试作例3、4和例6的流程图4.2 Pascal程序结构一、 程序结构program (input, output)(不能输入)说明部分Const pai=3.14159;Var S,r:real;执行部分Begin Writeln(Input a data for R:);Readln(r);S:=pai*r*r;Writeln(Area=:,S);End.二、 Pascal 语言的符号1、 标准标识符 Interger Read write等等2、 保留字的符号 如Begin end var const等等3、 自定义标识符在自定义标识符时不能与保留字或系统预定义的标识符同名。错误的标识符：不能有空格、分号； 标识符必须以字母或下划线开头；标识符不能有非字母、非数字、非下划线等符号；标识符不能与保留字同名；例：说出下面哪些是合法的标识符，如果不合法，请说明原因。Begin 1a X? b no_1 var function 4.3 程序的调试1、 菜单栏 按F10或Alt+菜单首字母可进入菜单，再按光标键移动，按回车键选择你选定的菜单命令。2、 对话框用Tab键来回切换3、 CTRL+F9 运行程序；按ALT+F5杳看输出窗口4、 多窗口按F6切换4.4程序设计的几个基本概念一、常量和变量常量定义的一般形式： const =常量1； =常量2； =常量n；变量定义的一般形式：var ：类型1；：类型2；：类型n；二、 数据类型1、 整型 Shortint integer longlnt byte word整除运算：Div 13 div 4=3 取模（余）运算： Mod 13 mod 4=12、 实型 real Single Double Extended Comp3、 字符类型 char4、 布尔类型 Boolean true和False表示布尔运算：not and or 三、 标准函数 函数名称自变量类型函数值类型函数说明函数举例Abs(x)整型、实型同自变量求x的绝对值Sqr(x)整型、实型同自变量求x的平方Sqrt(x)非负整型、实型非负实型求x的平方根Exp(x)整型、实型实型exLn(x)正整型、实型实型求x的自然对数Random(x)整型无自变量时为（0，1）的随机小数；有时为（0，X）间的随机整数Int(x)实型实型求x的整数部分Trunc(x)实型整型求x的整数部分无小数点Round(x)实型整型将x四舍五入到整数Frac(x)实型实型求x的小数部分Chr(x)整型字符型求序号为x的字符Chr(97)=aOrd(x)顺序类型整型求x的序号Ord(a)=97Pred(x)顺序类型同自变求x的前一项Succ(x)顺序类型同自变求x的后一项逻辑判断函数： odd(3)=true odd(4)=False 判断整数x是否为奇数。四、 表达式1、 算术表达式2、 关系表达式3、 字符表达式4、 逻辑表达式运算的优先级别例：（1）、用Pascal语言表示：x/(x+x/(x+1)（2）、且，或者x=13 用Pascal语言表示：（x=1）and (x=10) and (x5) or (x=13)(3)、用用Pascal语言表示：Sqrt(b*b-4*a*c)(4)、Odd(3) and (5 mod 2 =0)练习：P1703将下列表达式写成Pascal语言表达式：（1）、1+（）（2）、（3）、且（4）、x大于0或y不等于-1（5）、A为奇数上机练习题1、 在计算机上求出下列表达式的值：（1）ord(9)-ord(0) (2) 45 mod 7 (3) a2(4) True and odd(5) (5) 21 mod 3 (6 ) 3=3 (7) Trunc(0.7)Round(0.7) (8) pred(3) (9) 4 div 22、 在计算机中输入、运行和改正下列程序中的错误：（1） var I:byte; begin I:=10.0;J:=I+1;Write(j);End.(2) var m,n:byte;X:real;Begin N:=1000;X:=10;N:=m div X;Write(N);End.第五章 程序设计初步51顺序程序设计一、赋值语句的一般格式为： ：=表达式；注意：赋值号“：=”是赋值专用符号：区别“I:=5;”与“I=5”的不同含义。二、输入输出语句1、 输入语句： Read(); 例：read(a,b,c);读入a、b、c三个变量的值Readln();Read语句与Readln语句的区别：Readln语句在所有变量赋值后还要读取一个回味车键。2、 输出语句：Write(); 例：Write (a,b,c); 输出a、b、c三个变量的值Writeln();（Writeln语句在输出完后会自动换行）Write(A:M)；表示输出A的值在屏幕上占用M个字符位置。Write(A:M:N)； 表示输出A的值在屏幕上占用M个字符位置，N为小数点后的位数。三、实例讲解：例5.1有1个三角形，底为5，高为4，求面积。流程图：定义S,H,L三个变量；给底L赋值；给高H赋值；计算面积S的值输出S的值例5.2输入三角形的高和底，求三角形的面积流程图：定义S,H,L三个变量；输入H、L的值计算面积S的值输出S的值例54编程求A、B两个整数的商和余数流程图：定义A、B、商为C、余数为D四个变量输入A、B的值；求商C的值；求余数D的值；分别输出C、D的值；思考与练习：P1812、编程交换2个变量的值。程序中只允许使用2个变量，（参见4.2节思考题1）3、 华氏温度（F）和摄氏温度（）之间的转换公式为：=5/9*（F-32），编程将摄氏温度转换成对应的华氏温度。4、 输入一个3位数，分别输出它的个位数、十位数和百位数。5、 编程输出如下所示图形： % % % % % % % % % % % % % % % % 52选择程序设计一、 逻辑运算二、 if语句1、双重条件判断if语句的一般格式： if then 语句1 else 语句2；例5.5 编程判断一个数是否为奇数。分析：odd(X)可判断一个整数是否为奇数。流程图：定义整型变量X输入X的值YESNOOdd(X)输出X是奇数输出X是偶数例：输入三个不相同的数，求出其中的最小数。定义4个变量a、b、c、min输入a、b、c的值abYNa的值赋给min b的值赋给mincc) and (b+ca) and (a+cb)计算l的值(l:=(a+b+c)/2显示输入错误计算S的值(s:=sqrt(l*(l-a)*(l-b)*(l-c)输出S的值思考与练习：P190上机练习题2、多重条件（1） if语句的嵌套条件P条件M条件N语句1语句2语句3语句4YYYNNN说明：If then if then 语句1 else 语句2 else if then 语句3 else 语句4 ； 例：输入一个同学的单科成绩，如果小于60分，则输出D，60-80之间的为C,80-90之间的为B，90-100之间的为A。输入一个数XNOYesX60输出DX80YesNO输出CNOX90Yes输出B输出A(2)、case 语句一般格式：case of ：语句1；：语句2；：语句3； ：语句n； else ：语句m； end；5.3循环结构程序设计一、 循环