发布时间 : 星期一 文章PASCAL语言程序设计更新完毕开始阅读3d510ca32b160b4e767fcff8
目录
第一部分 PASCAL语言程序设计 ....................................... 1 第一章 PASCAL语言基础 ............................................. 1
第一节 程序的组成与上机调试运行........................... 2 第二节 常量、变量与数据类型................................ 3 第三节 表达式与标准函数.................................... 6 第四节 赋值语句、输入与输出语句............................ 9 习题....................................................... 12 第二章 程序的三种基本结构 ....................................... 15
第一节 顺序结构........................................... 15 第二节 选择结构........................................... 15 第三节 循环结构........................................... 17 习题....................................................... 20 第三章 数组 .................................................... 22
第一节 一维数组........................................... 22 第二节 二维数组及应用..................................... 25 习题....................................................... 26 第四章 字符与字符串操作 ......................................... 29
第一节 字符和字符数组.................................... 29 第二节 字符串变量......................................... 29 第三节 字符串应用举例..................................... 31 习题....................................................... 33 第五章 函数与过程 .............................................. 35
第一节 自定义函数......................................... 35 第二节 自定义过程......................................... 38 第四节 递归............................................... 42 第五节 递归与回溯......................................... 45 习题....................................................... 50
第一部分 PASCAL语言程序设计
第一章 PASCAL语言基础
Pascal语言是瑞士苏黎士工科大学的Niklans Wirth（沃思）1971年发表的，是为了纪念17世纪法国著名哲学和数学研究者Blaisc Pascal而将它命名为Pascal程序设计语言。Pascal语言是信息学奥赛中普遍使用的程序设计语言。
1 / 53
第一节 程序的组成与上机调试运行
一、程序的组成 我们先看一道例题。
例1-1 输入两个整数a和b，计算a和b的和（a+b）。 【参考程序】
program a1(input,output); //程序首部
var a,b,c:integer; //程序说明部分，a,b,c被说明为整型变量 begin //程序执行部分，下面是程序的内容
write('a='); //在屏幕上输出一个字符串“a=”，输出完后不换行 read(a); //从键盘输入一个数值赋给变量a
write('b='); //在屏幕上输出一个字符串“b=”，输出完后不换行 read(b); //从键盘输入一个数值赋给变量b
c:=a+b; //计算a+b的和，并将这个和赋值给变量c
writeln(a,'+',b,'=',c); //输出a+b=c的等式，输出完后换行 end. //程序结束 【样例输入】 a=10 b=30
【样例输出】 10+30=40
由上可以看出，一个Pascal程序由以下三部分组成： （1）由Program 引导的一行是Pascal程序的首部。
程序首部指出了源程序的名称，是由用户自己给出的，该例子称为a1。程序名后用括号括住的两个参数input与output，通常表示程序运行中的标准输入和输出文件，程序首部以分号结束。
（2）Pascal程序的第二部分是说明部分。
说明部分要求列出程序中引用的全部常量、变量、转移标号、类型、过程和函数的有关说明。若变量c在说明部分没有说明，后边的语句c:=a+b在执行时；翻译软件便能指出其错误并提醒用户加以改正，程序中每个语句都以分号表示结束。
（3）程序的第三个部分是用BEGIN和END括住的一串语句，称为程序的执行部分。有的书中将说明部分和执行部分合称为程序体。
二、PASCAL语言编辑软件的基本操作
下面我们以Free Pascal 1.10系统为例来学习一下Pascal语言编辑软件的使用。 1.Free Pascal的启动
在运行程序目录下(一般是c:\\pp\\bin\\go32v2)运行启动程序fp.exe，即可启动系统。屏幕上出现如图1-1所示的集成环境。
图1-1
2.Free Pascal系统集成开发环境(IDE)简介
最顶上一行为主菜单，中间蓝色框内为编辑窗口，在编辑窗口内可以进行程序的编辑，最底下一行为提示行，显示出系统中常用命令的快捷键，如将当前编辑窗口中文件存盘的命令快捷键为F2，打开磁盘文件命令F3，等等。
2 / 53
3.新建程序窗口
按F10切换到主菜单，选择FILE菜单，执行其中New命令，就可建立一个新的程序窗口（默认文件名为Noname00.pas或Noname01.pas等）。
4.程序的输入、编辑与运行
在当前程序窗口中，一行一行的输入程序。当程序输入完毕之后，一般要先按Alt+F9（或执行compile菜单中compile命令）对程序进行编译。如果程序有语法错误，则会出现一个Compiler窗口，提示你语句错误的坐标。若无语法错误，则窗口正中央会出现一个对话框，提示编译成功。接下来，我们可以运行程序了。
程序的运行可以通过按ALT+R打开RUN菜单中的RUN命令，或直接按快捷键CTRL+F9，则可以在用户窗口中输出运行结果。通常在程序运行结束后系统回到Pascal系统的集成环境，因此要查看运行结果，要按ALT+F5将屏幕切换到用户屏幕。
5.程序的保存与打开
当我们想把程序窗口中的程序存入磁盘时，可以通过按F2键(或执行File菜单中的save命令)来保存程序。第一次保存文件时屏幕上会出现一个对话框要求输入文件名(默认扩展名为.pas)。
当我们要将磁盘上的PASCAL程序打开（装入窗口）时，可按F3(或执行File菜单中的Open命令)来打开程序，此时系统也会弹出一个对话框要求输入要打开的文件名，或直接在文件对话框列表中选择所要打开的文件。
第二节 常量、变量与数据类型
一、常量
（1）常量：在某个程序运行的整个过程中其值不能发生改变的量。 （2）常量定义：常量定义出现在说明部分。它的语法格式是： const
<常量标识符>=<常量>; ...
<常量标识符>=<常量>; 例如： const
pi=3.141592; //此种方式定义的常量在程序中不可以改变
（3）常量定义部分必须以保留字const开头，可以包含一个或几个常量定义，而且每个常量均以分号结束。
二、变量
（1）变量定义：在某个程序的运行过程中其值可以发生改变的量。它应具有以下三个要素：变量名、变量类型和变量值。
（2）变量说明：变量说明出现在说明部分。它的语法格式是： var
<变量列表>:<类型>; ...
<变量列表>:<类型>; （3）变量名
每一个变量必须用一个合适的标识符来命名。
标识符是用来标识处理对象（如常量、变量、类型、过程、函数、程序和文件等）的符号名称。标识符是编程者命名的，自由度很大。命名中应该注意遵循一定的规则，如必须以字母开头，后面可以跟字母、数字和连字符“_”，若有连字符“_”则必须位于标识符中间。如：a,root,tot,t3,exp_1都是合法的标识符，而3a,a#,my%都不是合法的标识符。
（4）变量的类型
在Pascal程序执行的任一时刻，变量总有相应的值。由于变量是有类型的，所以整型变量对应整数值，实型变量对应实数值。
3 / 53
在Pascal语言中规定：在程序中使用的变量必须先定义后使用。如果用到的变量没有定义就使用，程序编译时会出现“Identifier not found X”的错误信息。
例1-2 已知某圆的半径r=15.15，求该圆的面积s？ 【分析】圆的面积s=3.14*圆的半径r*圆的半径r 【参考程序】 program t301;
const pi=3.14;
var s,r:real; //定义两个实型变量s,r begin
r:=15.15; s:=pi*r*r;
writeln(s:10:2); //显示宽度是10，保留两位小数 end. 【输出结果】 47.57 三、数据类型
Pascal语言提供了丰富的数据类型，大致分为以下三类，如图1-2所示：
图1-2
简单类型是指该类型不能再分解为其它类型，而结构类型是由简单类型所组成的，或者说结构类型是由简单类型所构造成的。 1.整型
一个整型数据用来存放整数。Free Pascal支持七种预定义整型，它们是shortint（短整型）、integer（整型）、longint（长整型）、byte（字节型）、word（字类型）、int64和Qword，每一种类型规定了相应的整数取值范围以及所占用的内存字节数。
类型 数值范围 占字节数 Shortint -128..127 1 byte 0..255 1 word 0..65535 2 integer 32768..32767 2 longint -2147483648..2147483647 4 int64 -9223372036854775808..9223372036854775807 8 qword 0..18446744073709551615 8 Free Pascal预定义了两个整型常量标识符maxint和maxlongint，他们各表示确定的常数值，maxint为32767，maxlongint为2147483647，他们的类型分别是integer和longint。
2.实型
Free Pascal语言支持五种预定义实型，它们是real（基本实型）、single（单精度实型）、double（双精度实型）、comp（）、extended（扩展实型），每一种类型规定了相应的实数取值范围、所占用的内存字节数以及它们所能达到的精度。
4 / 53