《第三章到第九章(精品)》由会员分享,可在线阅读,更多相关《第三章到第九章(精品)(220页珍藏版)》请在金锄头文库上搜索。
1、第三章Turbo Pascal语言简介第一节 Turbo Pascal 的安装与运行PASCAL语言是一种算法语言,它是瑞士苏黎世联邦工业大学的N沃思(Niklaus Wirth)教授于1968年设计完成的,1971年正式发表。它的命名是为了纪念法国数学家Pascal。PASCAL语言是一种结构化的程序设计语言,可以用来编写应用程序。它又是一种系统程序设计语言,可以用来编写顺序型的系统软件(如编译程序)。它的功能强、编译程序简单,是70年代影响最大一种算法语言。Turbo Pascal 是由美国Borland公司设计、研制的一种适用于微机的Pascal语言应用开发集成环境。该产品由1983年推
2、出1.0版本发展到1992年推出的7.0版本,功能不断完善。(参看p20)1.安装及启动 本系统可以直接把TP70H文件夹复制到任意磁盘如d:;然后在TP70H文件夹中找到文件TP70H.EXE,发送到桌面快捷方式,点击“Turbo Pascal”程序图标即可运行。2.Turbo Pascal系统的退出退出Turbo Pascal系统的方法有:(1) 选择主菜单File中菜单项Exit,或者通过键盘命令ALT+X,可以彻底退出Pascal,若有未存储过的内容,系统会给出提示询问是否要保存;(2) 选择主菜单File中菜单项Dos shell可以退出Pascal,进入DOS提示符状态,但Pasc
3、al仍然驻留在内存中。欲返回Pascal,可以键入命令exit.3.集成环境及菜单使用 Turbo Pascal 集成环境(IDE)启动成功后,会出现下图的窗口界面,窗口由标题栏、工具栏、主菜单栏、编辑窗口和位于底部的状态行构成,这是Turbo Pascal 7.0的一个基本工作界面。4.程序的输入和调试 下面通过一个简单的Pascal 程序来说明如何完成一个程序的输入、编辑、编译、链接、运行、保存等操作。程序如下:program ex;begin writeln( Hello word!); readln;end.(1)进入编辑状态 选择主菜单File中的菜单项Load,或按快捷键F3,在出
4、现的对话框中输入文件名:test.pas,.pas可省略;若文件已存在,则调出。(2)输入源程序 光标在编辑窗口,此时将程序按书写格式输入,输入的过程中可使用光标键和删除键进行编辑操作,每行输完后按回车键换行。(3)保存程序 选择主菜单File中的菜单项Save,或按快捷键F2,则该程序就以test.pas为文件名保存在当前目录了。(4)编译源程序 程序输入以后,即可开始编译。运行主菜单Compile中的菜单项Compile,或者按Alt+F9,对所输入的程序进行编译,此时屏幕上会显示有关编译信息的对话框。 如果在编译过程中发现程序有语法错误,系统会提示第一个错误信息。此时,应有针对性地进行修
5、改。修改后再重复编译的过程,直到编译成功。(5)运行程序 选择主菜单Run中的菜单项Run,或按快捷键Ctrl+F9,则完成程序的编译和运行, (6)观察运行结果 通过快捷键Alt+F5切换到用户屏幕,以便观察运行结果。再按任一键可返回编辑窗口。(7)退出PASCAL Alt+x5。常用命令的快捷方式 F3:打开或建立文件F2:保存文件Alt+F9:编译程序 (也可直接按F9,程序有错误时光标会停在错误的地方)Ctrl+F9:编译和运行程序Alt+F5:查看程序运行结果Alt+x:退出PASCALCtrl+c:中断程序运行Ctrl+Insert:复制Shift+Del:剪切Shift+Inse
6、rt:粘贴Ctrl+Y:删除一行Alt+Backspace:撤消第二节 Pascal 程序结构和基本语句通过下面的简单例题,可以速成掌握Pascal程序的基本组成和基本语句的用法,让初学者直接模仿学习编写简单程序。例1.1编程在屏幕上显示“Hello World!”。 program ex11;begin writeln(Hello World! ); readln;end.这个简单样例程序,希望大家的程序设计学习能有一个良好的开端。程序中的writeln是一个过程调用语句(Pascal没有输入、输出语句,用过程调用语句read()和write()代替),它能命令计算机在屏幕上输出相应的内容,
7、而紧跟writeln语句后是一对圆括号,其中用单引号引起的部分将被原原本本地显示出来。p59.例3-5 写一个程序,原样打印如下图所示的杨辉三角图形。 1 1 1 1 2 1 1 3 3 11 4 6 4 1 program YanghuiTriange2;beginwriteln(write yanghuis triangle);writeln( 1);writeln( 1 1);writeln( 1 2 1);writeln( 1 3 3 1);writeln(1 4 6 4 1);end.例1.2已知一辆自行车的售价是300元,请编程计算a辆自行车的总价是多少?解:若总售价用m来表示,则
8、这个问题可分为以下几步处理:从键盘输入自行车的数目a;用公式 m=300*a 计算总售价;输出计算结果。 program ex12; 程序首部 var a,m: integer;说明部分 begin语句部分 write(a=); readln(a);输入自行车数目 m := 300*a;计算总售价 writeln(m=,m);输出总售价 readln;等待输入回车键 end.此题程序结构完整,从中可看出一个Pascal 程序由三部分组成:(1)程序首部由保留字program开头,后面跟一个程序名(如:Exl1);其格式为: program 程序名;程序名按标识符定义由用户自己取,它的第一个字符
9、必须是英文字母,其后的字符只能是字母或数字和下划线组成,程序名中不能出现运算符、标点符和空格。(2)说明部分程序中所用的标号(label)、常量(const)、类型(type)、变量(var)、过程(procedure)与自定义函数(function),需在使用之前预先说明,定义数据的属性(类型)。例如, var s,r,c: real; 是变量说明,此处说明s,r,c三个变量均为实数类型变量。只有被说明为某一类型的变量,在程序中才能将与该变量同类型的数值赋给该变量。变量说明的格式为: var 变量表:类型;(3)语句部分指由保留字 begin至 end.之间的语句系列,是解决问题的具体处理步
10、骤,也是程序的执行部分。这部分的语句系列称复合语句,其中不能有说明语句,语法上当成一个语句对待;begin、end对,又称语句括号。Pascal程序不管是哪部分,每句末尾都必须有分号(;)作为语句的分隔符,但允许最接近 end 的那个语句末尾的分号省略;程序结束的end末尾必须有圆点(. ),是整个程序的结束标志。程序中花括号“ ”之间的部分为注释部分。Pascal程序结构可归纳用如下的示意图来表示: Program 程序名; 程序首部 标号说明; (label) 常量说明; (const) 说明部分 类型说明; (type) 变量说明; (var) 过程或函数说明; begin 程序体 (主
11、程序) 语句系列; 语句部分 end. 图1.1 Pascal程序的结构把处理问题的步骤编成能从上到下顺序执行的程序,是简单程序的基本特征。再来分析下面例题的Pascal程序结构和继续学习基本语句。例1.3编程计算半径为r的圆的面积和周长。解:这是一个简单问题,按数学方法可分以下几步进行处理: 从键盘输入半径的值r; 用公式 s=r2 计算圆面积; 用公式 c=2r 计算圆周长; 输出计算结果。 program Ex13;程序首部 var r,s,c: real; 说明部分 begin 语句部分 write (r=); readln(r); 输入半径 s:=pi*r*r; 圆面积公式S=r2
12、c:=2*pi*r; 圆周长公式C=2r writeln(s=,s); 输出结果 writeln(c=,c); readln 等待输入回车键 end.程序中pi是Pascal提供的标准函数,它返回圆周率的近似值:3.1415926。(:=)是赋值符号,赋值语句的格式为: 变量:=表达式;赋值语句的作用是将:=右边表达式的值存放到左边的变量中。writeln是输出语句,输出语句有三种格式: write (输出项1,输出项2) ; 执行输出后光标不换行 writeln (输出项1,输出项2) ; 执行输出后光标换到下一行 writeln仅输出空白且光标换到下一行writeln语句后面的圆括号以内部
13、分均为输出项,可以是多项,各项间用逗号分隔; 对单引号里的内容按照引号内的原样(字符)输出显示。如果输出项是表达式,则只输出表达式的值,而不是表达式本身。例1.4 输出两个自然数相除的商和余数。解:设被除数、除数、商和余数,分别为a,b,c,d,均为变量,且都是整数类型。题中未给出具体的整数a、b,可采用键盘输入方式。 给出提示,从键盘输入a, b; 显示两数相除的数学形式; 求出a除以b的商c; 求出a除以b的余数d; 紧接等式后面输出显示商和余数。 program ex14; var a,b,c,d : integer; begin write(Input a,b:); 给出提示信息 readln(a,b); 输入a,b writeln;