Pascal是一种过程式
编程语言，由
Niklaus Wirth于1968年设计并于1970年发布，并以法国数学家和哲学家
Blaise Pascal的名字命名。Pascal可以运行在多种平台上，例如
Windows、
Mac OS和各种版本的UNIX/Linux。
产生背景
Pascal由
瑞士苏黎世联邦工业大学的
Niklaus Wirth教授于六十年代末设计并创立。1971年，以电脑先驱帕斯卡pascal的名字为之命名。Pascal语言语法严谨，一出世就受到广泛欢迎，迅速地从欧洲传到美国。Pascal基于
ALGOL编程语言，为纪念法国数学家和哲学家
布莱兹·帕斯卡而命名。维尔特后来开发了类似Pascal的
Modula-2和Oberon。在开发Pascal之前，维尔特开发了语言Euler，然后开发了Algol-W。
Pascal是最早出现的结构化编程语言，具有丰富的数据类型和简洁灵活的操作语句。高级
语言发展过程中，Pascal是一个重要的里程碑。Pascal语言是第一个系统地体现了E.W.Dijkstra和C.A.R.Hoare定义的
结构化程序设计概念的语言。
最初，Pascal在很大程度上但不是完全地为了教授学生结构化编程。很多代学生已使用Pascal作为本科课程的入门语言。Pascal的变种也逐渐地用于从研究项目到
PC游戏和
嵌入式系统的所有领域。更新的Pascal
编译器存在于广泛使用它的领域。
GCC，Gnu C编译器，最初是用Pascal的一种方言Pastel编写的（见GCC#
概观）。Pascal是
Apple Lisa和早期
Mac开发使用的
高级语言；最初Macintosh操作系统的部分是从Pascal
源代码手工翻译成Motorola 68000
汇编语言的。流行的排版系统
TeX是由
高德纳使用基于DEC PDP-10 Pascal的最初
文学编程系统WEB编写的，而像
Total Commander的应用是使用Delphi（即
Object Pascal）编写的。
Object Pascal仍然广泛用于开发像
Skype这样的
Windows应用。
语言特点
特点
丰富的
数据结构和构造数据结构的方法。除了整型、实型、布尔型和数组外，还提供了字符、枚举、
子域、记录、集合、文件、指针等类型。由这些数据结构可以方便地描述各种
事务元。
简明灵活的
控制结构。具体的结构语句有
复合语句、如果语句、
情况语句、While 语句、Repeat
语句、For 语句和处理记录变量的分量的缩写形式———With 语句。
编译运行效率高。
严格的结构化形式。
查错能力强。
Pascal强调的
结构化编程带来了
非结构化语言如
Fortran之流无法比拟的美和乐趣，Unix崇尚的“小即是美”、“没有消息就是好消息”。
正因为上述特点，Pascal语言可以被方便地用于描述各种算法与数据结构。尤其是对于程序设计的初学者，Pascal语言有益于培养良好的
程序设计风格和习惯。
高级
语言发展过程中，PASCAL是一个重要的里程碑。1971年，
瑞士联邦技术学院尼克劳斯·沃尔斯（N.Wirth）教授发明了另一种简单明晰的
电脑语言，这就是以电脑先驱帕斯卡的名字命名的PASCAL语言。PASCAL语言语法严谨，编程语言。沃尔斯一生还写作了大量有关程序设计、算法和数据结构的著作，因此，他获得了1984年度“
图灵奖”。
⒈ 结构化
Pascal可以方便地书写出
结构化程序，保证了程序的正确性和
易读性。在结构化这一点上，Pascal比其它
算法语言更好。
⒉ 数据类型丰富
Pascal是一种
强类型语言。它提供了整数型、实数型、字符型、
布尔型、枚举型、子界型以及由以上类型构成的数组类型、集合类型、记录类型和文件类型。此外，还提供了其它许多语言中所没有的指针类型。丰富的
数据结构和上述的结构化性质，使得Pascal可以被方便地用来描述复杂的算法。
既适用于数值运算，也适用于非数值运算领域。有些语言只适用于
数值计算，有些语言则适用于商业数据处理和管理领域。Pascal的功能较强，能广泛应用于各种领域。
⒋ 书写较自由
得益于语句末的分号做
分隔符，Pascal允许一行写多个语句，一个语句可以分写在多行上，这样就可以使Pascal程序写得象诗歌格式一样优美，便于阅读,但一行不可超过257个字符。
由于以上特点，许多学校选Pascal作为程序设计课程中的一种主要的语言。它能给学生严格而良好的程序设计的基本训练，培养学生
结构化程序设计的风格。
缺点
传统PASCAL的标准库中缺乏对
网络编程的支持，并且仅通过自带的
graph单元难以实现较好的图形界面（
GUI），这些缺点大多需要嵌入汇编
语言代码才能得到解决，缺乏与
机器语言的接口。
另一方面，作为一个
面向过程的编程语言，和90年代兴起的面向对象的语言相比，不利于大型软件的开发。
尽管Pascal非常流行（然而在八十到九十年代时比21世纪更加流行），依据维尔特的对这种语言的定义来构建Pascal，使它不适合在非教学的场合使用，这遭到了广泛的批评。 推广了C语言的Brian Kernighan早在1981年就在他的论文《Why Pascal Is Not My Favourite Programming Language》对Pascal提出了严厉的抨击。
主要版本
在Pascal问世以来的三十余年间，先后产生了适合于不同机型的各种各样版本。其中影响最大的莫过于
Turbo Pascal系列软件。它是由美国Borland公司设计、研制的一种适用于微机的Pascal编译系统。该编译系统由1983年推出1.0版本发展到1992年推出的7.0版本，其版本不断更新，而功能更趋完善。应用最广泛的是Free Pascal 2.04。
Pascal有6个主要的版本，分别是Action Pascal Unextended Pascal、Extended Pascal、Object-Oriented Extensions to Pascal、Borland Pascal和Delphi Object Pascal。其中，Unextended Pascal、Extended Pascal和Object-Oriented Extensions to Pascal是由Pascal标准委员会所创立和维护的，Unextended Pascal类似于瑞士Niklaus Wirth教授和K.Jensen于1974年联名发表的Pascal用户手册和报告，而Extended Pascal则是在其基础上进行了扩展，加入了许多新的特性，它们都属于正式的Pascal标准；Object-Oriented Extensions to Pascal是由Pascal标准委员会发表的一份
技术报告，在Extended Pascal的基础上增加了一些用以支持
面向对象程序设计的特性，但它属于非正式的标准。
Action Pascal则以中文作为程序代码表达的语言形式。是一个高级解释性编程语言。
Borland Pascal和Delphi Object Pascal是由Borland公司专门为其开发的编译工具设计的Pascal语言，前者是用于DOS的Turbo Pascal系列和Windows 3.x的Turbo Pascal for Windows的传统
高级语言，后者是用于Windows的Delphi和Linux的Kylix的
面向对象程序设计语言，它们都不是正式的Pascal标准，具有专利性。但由于
Turbo Pascal系列和Delphi功能强大并且广为流行，Borland Pascal和Delphi Object Pascal已自成为一种标准，为许多人所熟悉。
编程技巧
基本符号
Pascal语言在 OEM-美国 编码下只能使用以下几类
基本符号：
A B C D E F G H I J K L M N O P Q R S T U V W X Y Z
a b c d e f g h i j k l m n o p q r s t u v w x y z
数字
1 2 3 4 5 6 7 8 9 0
其他符号
+ - * / = <> <= >= > < ( ):= , . ; : .. ‘ ’ ^ @$ div mod shr shl
注：Pascal语言除了可以使用以上规定的字符外，不得使用其他任何符号；
Free Pascal 中，
大写字母与
小写字母没有区别，只是除了
字符串中的字母，即是说：A与a被认作同一个字母。
Pascal中，字符代码是由
ASCII（American Standard Code for Information Interchange，美国信息互换标准代码）码进行转换的。由函数chr(x) （求编号x对应的字符）和ord(x) （求字符x或
枚举型X对应的编号）进行转换执行。
开发工具
Turbo Pascal
Turbo Pascal 它提供了一个集成环境的工作系统，集编辑、编译、运行、调试等多功能于一体。
Pascal是一门
编程语言，而Turbo Pascal/
Free Pascal是Pascal程序的
编译系统。
Turbo Pascal是
DOS下的一种16位编程工具，在Delphi出现之前，它是世界上最多人使用的Pascal编程工具，拥有编译速度极快的先进
编译器和功能强大而又简便易用的
集成开发环境（IDE），在微机程序员中广为流行，正是它的出现奠定了Pascal在DOS/Windows平台上不可动摇的根基，现常见的版本有Turbo Pascal 5.5、Turbo Pascal 6.0和
Borland Turbo Pascal with Objects 7.0。Turbo Pascal 6.0与Turbo Pascal 5.5相比，主要是IDE更为强大，而其程序设计
功能改变不大，只是增加了一些新的功能，例如可以内嵌asm汇编语句等。而Borland Turbo Pascal with Objects 7.0（简称Borland Pascal 7.0）则有了新的飞跃，首先是IDE进一步加强，提供了程序浏览器，然后是程序设计功能有了很大的提升，新增了一些十分有用的标准
子程序，支持比较完善的
面向对象程序设计功能，并提供了DOS
实模式、DOS
保护模式和Windows模式三种
程序编译模式，能够编写出可以使用
扩充内存（
XMS）的保护模式
应用程序或者在
Windows 3.x下运行的
Windows程序，另外还提供了一个对象窗口库（OWL），使用它可以快速的开发出具有一致的视窗界面（DOS或Windows 3.x）的应用程序。Borland Pascal 7.0在1992年推出，是Turbo Pascal系列在DOS下的最后版本。
Free Pascal
Free Pascal是由一个国际组织开发的32/64位Pascal编程工具，属于
自由软件，可用于各种操作系统。根据编译选项的不同，它可以使用Turbo Pascal兼容语法、Delphi 语法或者其它语法进行编写程序。由于它拥有32/64位的
编译器，而且一直在更新发展中，因此它的功能比Borland Pascal更加强大，拥有许多现代程序设计的特征。但它对程序员的吸引力比不上拥有VCL和
CLX的Delphi和
Kylix。
Free Pascal是一个在多种版本Pascal和Delphi下的产物，比较成熟的版本是由
FreePascal. org发布的2.2.4版本（最新版本为3.0.0），由于是Pascal上的改版，在FP里加入了很多以前没有的东西，例如：FillChar系列内存块
赋值语句，用Power代替了**（
乘方），但是**还是可以使用。
另外FP加强了与内存的互容性，增大对内存的支持，FP里的内存限制是TP和BP里的将近上万倍。
FP还进一步加强了单元支持、
面向对象程序设计动态连接库、控件、数据库、文件、网络、
OpenGL的深入支持，使得 FP 在各种 Pascal
编译系统中脱颖而出。
更值得提出的是，FP支持Delphi及C++的部分语言，例如：A+=2这样的C Style语言，在FP里完美支持。
FP中支持单目、双目
操作符，即所有版本的Pascal的符号和“@”等
特殊符号。
FP现为竞赛推荐工具。
最新发布版本为 2014 年3 月11 日发布的 2.6.4。
最新 bugfix 版本为 svn repo 里的 2.4.3。
最稳定版本为2.4.4。
Free Pascal与Turbo Pascal的区别，Free Pascal使用的是
跨平台的32位编译器，最大可以利用4GB的内存。而对于Turbo Pascal来说，由于是16位的编译器，
数据类型和变量不能超过64 KB，而且只限在Windows上使用。这使得Free Pascal与Turbo Pascal存在着如下差别：
1. 表达式执行的顺序是不确定的。比如表达式a：=f（1）+g（2）；不保证f（1）一定在g（2）之前执行；
2.
布尔表达式不一定要全部计算，只要最终结果已经能够确定，就不再计算其他部分；
3. 乘方x^y可以表示成x**y。但x是实数且y是整数的时候不能这样表示。一般还是用
换底公式（exp（y*ln（x）））来计算x^y；
4. 因为在Free Pascal中添加了
函数重载功能，所以函数和过程在使用时，参数的类型必须和定义的完全一致。函数可以返回复杂的类型，比如记录和数组；
5. 在Free Pascal中，集合中的元素都是4个字节长的；
6. Free Pascal在
程序结束之前一定要关闭输出文件，否则输出文件可能不能被正确地写入；
7. Free Pascal支持
长文件名。在Windows系统中文件名的大小写是无关的。由于
信息学竞赛的评测系统是
Linux，而Linux对文件名区分大小写，所以程序中用到的文件名必须和系统中的文件名完全一致。
最后，如果代码遵守ANSI Pascal标准，就完全可以从Turbo Pascal移植到Free Pascal中使用。
Lazarus
Lazarus是一个用于
Free Pascal的
快速应用开发（RAD）的面向对象的Pascal集成
开发环境（IDE）。Lazarus 对于窗口管理来说是中性的。可以工作在
KDE（1.13版本）下，也可以工作在
GNOME（1.23版本）或其他
窗口管理器（MVM、WindowMaker）。Lazarus的
设计目标是应用Free Pascal，所以所有凡是Free Pascal能运行的平台，Lazarus也可以运行。最新版本能运行于Linux，Win9x/2000/xp/
win7和
FreeBSD。21世纪，已提供32位和64位版本支持。Lazarus的工作界面、外观和操作和Borland 的Delphi IDE非常相似，所不同的是Lazarus 是完全的自由软件。Lazarus 可以直接移植Delphi的代码。Lazarus的编程语言是以Pascal为基础的。Pascal语言具有可读性好、编写容易的特点，这使得它很适合作为基础的开发语言。同时，使用
编译器创建的应用程序只生成单个
可执行文件(.EXE，但生成的可执行文件体积相对Delphi的来说有点大，只包含一个空窗体的工程生成的可执行文件就达到了10多M。这里，可以通过编译选项来减小可执行文件的大小，可以减为1M多点，然后通过UPX压缩，可以减为600多K。）。正是这种结合，使得Pascal成为Lazarus这种先进开发环境的编程语言。Lazarus的最新版本为1.2.4。
CP Pascal Editor 有两大特色，第一，它含有一个初学者
知识库，在代码的任意关键字处双击鼠标左键，提示面板上将会显示与该关键词相关的知识，例如数据类型范围等。另外，CP Pascal Editor含有CP代码快速输入模式，这项功能使您可以在编写程序时使用来自其他语言的语法，甚至一些
伪代码表达方式。当您完成输入时，CP会自动将这些代码转换为Pascal代码，而且支持中文，弥补了Free Pascal不支持中文的缺陷。
在 CP Pascal Editor 中含有中文错误提示信息，并大幅度提高编辑速度，而且它的稳定性好，支持
语法高亮，支持代码中输入中文，还具有Math与Crt等常用单元。虽然它的界面还停留在传统的pascal编程界面，有些老套，但从功能上来看十分适合Pascal语言编写者使用。
语言结构
任何
程序设计语言都有一定的规则。使用Pascal语言必须遵循其本身所规定的规则来编写程序。尽管不同版本的Pascal语言所采用的符号的数量、形式不尽相同，但其基本成分一般都
符合标准Pascal的规定。下面我们首先来了解Pascal语言的程序
基本结构。
为了明显起见，先举一个最简单的Pascal程序例子：
【例1】
从这个简单的程序可以看到：
⒈ 一个Pascal程序分为两个部分：程序首部和程序体（或称分程序）。
⒉ 程序首部是程序的开头部分，它包括：
控制台Pascal程序的首部都必须以此字开头。在Free Pascal中，首部也可省略。
⑵程序名称。由程序设计者自己定义，如例中的li1。在写完程序首部之后，应有一个分号。
⑴说明部分用来描述程序中用到的
标号、常量、类型、变量、函数、过程等。正如示例中的“var”标注定义变量的名称、类型，其它的标注字段为：label（标号）、const（常量）、type（类型）、var（变量）、function（函数）、procedure（过程）。
Pascal规定，凡程序中用到的所有变量、
符号常量、数组、过程与函数、记录、文件等
数据都⑵执行部分的作用是给出需要计算机执行的操作。
⒋ Pascal程序的书写方法比较灵活。书写程序应结构清晰、容易阅读理解。在编写程序时希望读者尽量模仿本书中例题
程序格式和缩进（两个空格或一个Tab）。
⒌ 在程序中，一对
大括号间的文字称为注释（也可用(*、*)）。注释的内容由人们根据需要书写，可以用英语或汉语表示。注释可以放在任何空格可以出现的位置。编译器对注释不予理睬。
1、程序首部
程序首部是程序的开头部分，由
保留字program后，接
程序名及程序
参数表组成，结束时一定要有分号。程序名yzhch是用户自己定义的
标识符，参数表一般是文件变量名，用于该程序与外界的数据交流。最常用的参数为input和output。Turbo Pascal程序首部中参数表可以省略。
2、程序说明部分
Pascal语言要求用户将在程序中所使用的
标号、常量、类型、变量、记录、文件、以及过程和函数除了Pascal自己预先定义的标准量之外，都必须在说明部分说明后才能在程序执行部分使用。但各个内容部分是可选的，只有
执行程序部分需要的时候才进行说明。
3、程序执行部分
紧接着说明部分的begin和end之间的部分为程序的执行部分。它由一系列语句组成，一条语句执行一定的功能，所有语句完成程序设计的任务。语句之间用“;”隔开，允许一行写多个语句，也允许一个语句写多行。最后一行的end后加“.”号表示结束。所跟其后的语句将无任何作用。Begin与end应配对出现，这是每一个Turbo Pascal程序都必须的。
注意：后面将学习到的语句中，也需要引用begin和end作为
程序段的分隔标记，但其必须遵守语句规则。
概念
计算机处理
数据对象是一个广义的概念。例如，125、12.76是数据，’xiang qj zhong’这一串字符也是数据。前者是
数值数据，后者是
字符串数据，是非数值数据。显然，为了表示这些数据，它们在内存中必须以不同方式存放。为处理这些数据，计算机对它们施加的运算也不同。为此，Turbo Pascal语言建立了数据类型的概念，对描述的数据进行分类。每一种数据类型定义了一个具有相同性质的
数据集合。各种数据类型的数据具有不同的性质。程序中所用到的每一个数据，包括常量和变量都有一个和它相联系的类型。由此决定了数据所具有的值，也决定了对该数据所能进行的操作。
Pascal语言
中数据具有丰富的类型，按它们的特点可以分为
简单类型、
构造类型、指针类型和过程类型四大类，如图下所示。
其中，标准类型用
语言系统预先定义的标准标识符表示，
整型用
integer表示，实型用
real表示，
布尔型用boolean表示，字符型用
char表示。
二、常量
常量是指在程序中使用的一些具体的整型数、实型数和字符串。
(1)整型数：如9、3、-5、0等。
(2)实型数：如3.1、-6.1E+20等。
(3)字符串：是用
单引号括起来的一串字符，如，’book’、’96·5’、’ABC’等。
以上列举的都可以作为常量在程序中使用。为了提高程序的可读性并使程序便于修改，在程序中往往用一些标识符来代表具体的常量。
在Turbo Pascal语言中，可以给一些常量取个名字用一个标识符代表它，这就是常量定义。例如，Cost=60；Blank=’ ’。
经常量定义的标识符又称为常量标识符。
在Turbo Pascal语言中，常量定义要写在常量定义部分中。
常量定义部分的一般形式：
Const
(常量标识符1)= (常量1)；
(常量标识符2)=(常量2)；
(常量标识符n)=(常量n)；
Const是保留字，表示开始一个常量定义部分，其后可以有若干个常量定义，这些
常量定义之间要用“；”号分隔。例如：
Const
Cost=60；
A=Cost+30；
Pi =3.14159；
Turbo Pascal
语言对常量定义有如下要求：
(1)常量定义要放在程序的常量定义部分，即程序首部之后，执行部分之前。
(2)必须遵循先定义后使用的原则，即只有已经定义的常量标识符，才能在程序中
使用。
三、变量
在程序执行过程中其值可以改变的数据，称为变量。每个变量都要有一个名称，这就是变量名。变量名由用户自己定义，但必须符合标识符的规定。
在一个程序中，一个变量只能属于一种确定的数据类型。因此，程序中出现的每个变量都必须说明其数据类型，这样就规定了该变量的
取值范围，也决定了对该变量所能执行的运算操作。
变量的类型，可以是标准数据类型integer、real、boolean和char，也可以是用户自定义的各种类型。
变量说明形式是：一个变量标识符或由逗号隔开的多个变量标识符在它的
冒号在Turbo Pascal程序中，变量说明要写在变量说明部分中。
变量说明部分的一般形式:
var
(变量说明1)；
(变量说明2)；
……(变量说明n)；
其中var是保留字，表示一个变量说明部分开始。一个var可以含有多个不同的变量说明，每个变量说明之间用分号隔开，有时称被分号隔开的变量说明为变量
说明项。例如：
varx，y：real；chl：char；t，f：boolean；
注意:不同类型的变量一般不能互相串用。
这里还应指出，变量一经说明系统就在计算机
内存中为其分配一个存贮空间。在程序中使用到变量时，就在相应的内存中存入数据或取出数据，这种操作称为变量的访问。
标准数据类型
Pascal向程序设计者提供了丰富的数据类型，它们用于专门的目的，但却都是由简单的、非构造型的数据类型所构成的。本节介绍Turbo Pascal中最为基本的几种数据类型：
整型、实型、
布尔型和字符型。它们都是
系统定义的简单数据类型，称为标准数据类型，其对应的名字称为标准标识符。
1、整型
一个
整型数据用来存放整数，整型数据可以是
正整数、
负整数和整数零。
Turbo Pascal中的整型常数必须按规定严格书写。
Turbo Pascal支持五种预定义整型，它们是短整型(Shortint)、整型(Integer)、
长整型(Longint)、
字节型(Byte)和字类型(Word)，每一种类型规定了相应的整数取值范围以及所占内存字节数(一个字节为8个
二进制位)。因此，用户在具体编程定义变量类型时，要根据它们的特点选用适当的类型，以达到理想的效果。当两个不同范围类型的
操作数进行运算时，得到的结果属于较大范围的类型。如下表所示。
Turbo Pascal语言规定可以对
整型数据进行算术
运算符+、-、*、/、Div、Mod。
它们分别表示加、减、乘、除、
整除和取余。这六种运算，要求参加运算的两个数都是整型数，运算结果也是整型数。前四种运算与一般的
算术运算加、减、乘、除相同。Div整除运算，是两个整型数相除取
整数部分(商的整数部分)，得到整型结果。Mod取余运算，是两个整型数相除取
余数，余数的符号与
被除数符号相同。例如：
3 Div 2 = 1 5 Div 7 = 0
6 Div (-4) = - 1 (-12) Div (-5) = 2
7 Mod 4 = 3 (14) Mod (-4) = 2
(-18) Mod (-6) = 0 6 Mod l7 = 6
由此可见，a Mod b，所得结果的符号与a相同，其值(
绝对值)在0～∣b∣-1之间。
运算符Mod与Div之间有如下关系：
a Mod b = a – (a Div b) * b (b<>0)
其中Mod运算的结果的符号与a的符号相同。
利用以上两种运算可以对正整数进行分离。例如：
n为四位数8531，可用下法分离出它的个、十、百、千位。
(8531 Mod l00) Div l0 = 3 (十位数)
(8531 Mod l000) Div l00 = 5 (百位数)
8531 Div 1000= 8 (千位数)
利用 a Mod b可以判断a能否被b整除。当a Mod b = 0时，a能被b整除。
2、实型
一个实型数据用来存放实数。实型数据可以是
正实数、
负实数和实数零。实型数据一般用小数或指数形式(亦称科学
表示法)表示。例如：
+1993，33，3.5E+8(=3.5×105)， -0.5E-3(=-0.5×10-3，)，-20.0，，0.0等都是合法实型数。
Turbo Pascal支持一种预定义实型，它们是基本实型(Real)、单精度实型(
Single)、双精度实型(Double)、扩展实型(Extended)和装配实型(Comp)。每一种类型规定了相应的实数取值范围和所占内存字节数，以及它们所能达到的精度，即
有效数字位数。因此，用户在具体编程时应根据以上的参数适当选用，以达到最佳效果。如下表所示。
对于此类实型数据，若其绝对值大于上界，则产生
上溢；绝对值小于下界，则产生下溢，下溢导致结果为0。Comp类型的取值范围是-263+1～238-1之间的整数，相当于十进制的-9.218～9.218。由于Comp类型的
数据表示成
二进制形式的数，这种类型的变量有时处理起来比较方便，特别对于数值很大的整数间的计算，这种数据类型很有用。
Turbo Pascal语言允许实型数使用下列
运算符进行运算。
运算符：+、-、*、/
3、字符型
用标准
标识符Char标明字符型。
字符型数据可以是字母、符号、数字(0-9)等
ASCII码的所有字符。Turbo Pascal支持扩展ASCII码，共包括256个字符。但非印刷字符是不能在标准显示上显示或
打印输出。在计算机内部，
字符集的元素是以该元素在字符集内的顺序位置来标记的，位置取值范围为0~255，我们称这些整数为字符在字符集内的序数值或序号。每个字符型数据在内存中占一个字节。将字符用单引号括起来，即成
字符常数，如，’X’，’7’，’?’。字符常数可按字符的序数值确定大小关系，也就是说它们的大小由它们所对应的ASCII码值决定，如：’Y’，’Z’，’A’<’a’。
由于采用ASCII码，字符依ASCII码序号排列。这样，字符与ASCII码序号有
一一对应的映射关系。
一个布尔型数据用来存放
逻辑值，或称
布尔值。Turbo Pascal支持预定义布尔型，以标准标识符Boolean表示。Boolean一词，系根据19世纪英国数学家George boole (1815-1864)的名字而得，George boole为现代
布尔代数之父。布尔型数据的值只有两个：
True(逻辑真)和False(逻辑假)。布尔型是顺序类型，规定False
逻辑运算的结果只有两个：True（真）和False（假）。Turbo Pascal提供了六种
关系运算符和四种
逻辑运算符：
=(等于)、<（小于）、<=（
小于等于）、>（大于）、>=（
大于等于）、<>（不等于）
NOT（非）、AND（与）、OR（或）、XOR（
异或）
运算关系
函 数
标准函数。Turbo Pascal语言提供了
自变量为
整型量的标准函数有顺序函数算术函数和
转换函数等。
标准函数是Turbo Pascal语言预先定义的，它们实际上是能完成特定功能的称步子程序的
程序段。每个标准函数都用一个
标识符来标识，每个标准函数都能完成一个特定的功能，在程序中可以直接调用它们。Turbo Pascal语言中某些标准函数与数学中的函数有相似之处。
整数类型函数
整型是顺序类型，即所有的整型数都是按一定的
顺序排列的。如3的后序数是4，350的后序数是351。以后介绍的
布尔型、字符型、
枚举类型和子界类型等都是顺序类型。顺序函数可以对顺序类型数据进行操作，但要注意它们自变量的取值范围。
①前趋函数：Pred(x)的
函数值为x-l，例如：
Pred (6)=5 Pred (-21)=-22
②
后继函数：Succ (x)的函数值为x+l，例如：
Succ (l5)=16 Succ (-114)= -113
③自增函数：Inc (x)的函数值亦为x+1，例如：
Inc(24)=25 Inc(-36)=-35
④自
减函数：Dec(x)的函数值亦为x-1，例如：
Dec(45)=44 Dec(-46)=-47
绝对值函数：Abs (x)的函数值为︱X︱，例如：
Abs (-119)=119 Abs (101)=101
平方函数：Sqrt(x)的函数值为X2，例如：
Sqrt(-5)=25 Sqrt (10)= 100
以上四个函数的结果仍是整型数。
⑤
奇函数：Odd (x)，函数的结果为
布尔型。当X为奇数时，函数值为true；当X为偶数时，函数值为false。例如：
Odd (13)= True Odd (16)= False
⑥
字符函数：
Chr (X)，函数值是序号的ASCII字符，属字符型。例如：
Chr (65)=’A’ Chr (32)=’ ’
⑦序号函数：Val(X)，函数值是ASCII字符所对应的序号，属整型。例如：
Val('+')=43 Val('_')=95
二、实数类型函数
在下列算术函数中，X可以是实型或整型数的表达式。对于函数Abs和
Sqr，其结果类型和变量X的类型相同，其他算术函数的结果类型都是实型。
绝对值函数Abs(x)：函数值为x的绝对值
平方函数Sqr (x)：函数值为x的平方
小数函数Frac (x)：函数值为x的小数部分
整数函数Int (x)：函数值为x的整数部分
正弦函数Sin (x)：函数值为x的正弦，其申，x的单位为
弧度 余弦函数Cos (x)：函数值为x的余弦，其中，x的单位为弧度
反正切函数Arctan(x)：函数值为x的反
正切，单位为弧度
随机函数Random：无自变量时，函数值取(0,1)间的随机小数；有自变量且为Word类型时，函数值取(0，自变量)间的随机整数。
三、字符类型函数
Turbo Pascal语言提供如下自变量为字符型的标准函数，其中Ch为字符型。
后继函数Succ (ch)：例如，Succ (’8’)=’9’ Succ (’E’)=’F’
前趋函数Pred (ch)：例如，Pred (’7’)=’6’ Pred (’B’)=’ A’
序数函数Ord (ch)：给出字符ch在ASCII字符集中的序号，结果为
整型。
注意：Ord (’7’)<>7，正确的是：Ord (’7’)=Ord(’0’)+7=48+7=55
若ch是数字字符，则Ord (ch)-Ord ('0')是该数字字符的数值。例如：Ord (’7’)-Ord(’0’)=7
前面介绍的字符函数Chr (i)是Ord (ch)的逆函数。例如:
Chr (55)= ’7’ Chr (Ord(’A’))=’A’
Turbo Pascal语言提供
布尔型函数主要是几个字符型函数。
Ord (B)例如：Ord (false)=0 Ord (true)=1
表达式
运算是对数据进行加工处理的过程，得到运算结果的
数学公式或其它式子统称为表达式。表达式可以是常量也可以是变量或
算式，在表达式中又可分为：
算术表达式、
逻辑表达式和字符串表达式。
1、算术表达式：
算术表达式是最常用的表达式，又称为
数值表达式。它是通过
算术运算符来进行运算的数学公式。我们先来看
Visual Basic中的算术运算符：
算术运算符
* X*Y 求X乘Y的值 6*7=42
/ X/Y 求X除Y的值（
浮点数运算） 2.76/1.2=2.3
div X div Y 求X除Y的整数商（对
整型数计算） 25=5
Mod X mod Y 求X除Y的余数（对整型数运算） 25 mod 4=1
- X-Y 减法运算 48-21=27
由于Visual Basic只能识别按其格式书写的数学表达式，所以必须将我们常用的数学表达式转换成Visual Basic表达式。例如：
数学式 Visual Basic表达式
2、逻辑运算
逻辑运算的结果只有两个：True（真）和False（假）。Visual Basic提供了六种关系
运算符和四种逻辑运算符：
=(等于)、<（小于）、<=（小于等于）、>（大于）、>=（大于等于）、<>（不等于）
NOT（非）、AND（与）、OR（或）、XOR（异或）
运算关系
p q NOT p p AND q p OR q
True True False True True
True False False False True
False True True False True
False false True False False
例如：5>3 结果为 True, “a”>”b” 结果为False。
3、表达式的运算优先顺序
在进行表达式的
转换过程中，必须了解各种运算的优先顺序，使转换后的表达式能满足数学公式的运算要求。运算优先顺序为：
括号→
函数→
乘方→乘、除→加、减→字符连接运算符→
关系运算符→
逻辑运算符如果同级的运算是按从左到右次序进行；多层括号由里向外。
例：
① ④ ③ ⑤ ② ⑥ ⑦ ⑧
Sqrt(Abs(p/n-1))+1
④ ③ ① ② ⑤
2.1 Pascal字符与符号
(1) 标识符的定义：标识符就是以字母开头的字母数字序列，
有效长度为63个字符，并且大小写等效。可以用来标示常量、变量、程序、函数等。例如例1.1中的Area(程序名)，pi(
符号常量)，s、r(变量名)都是标识符。
(2) 标识符的分类：
a.保留字(关键字)
所谓保留字是指在Pascal语言中具有特定的含义，你必须了解它的含义，以便于正确的使用，否则会造成错误。标准Pascal语言中的保留字一共有35个，Turbo Pascal语言一共有51个。下面是Pascal语言的保留字:
AND，ARRAY，BEGIN，CASE，CONST，
DIV，DO，DOWNTO，ELSE，END，FILE，FOR，FUNCTION，GOTO，IF，IN，LABEL，MOD，NIL，NOT，OF，OR，PACKED，
PROCEDURE，PROGRAM，RECORD，REPEAT，SET，THEN，TO，TYPE，
UNTIL，
VAR，WHILE，WITH等
b.标准标识符：指Pascal语言预先定义的标识符，具有特殊含义。
以下列举了Turbo Pascal语言部分常用的标准表识符：
标准常量 False Maxint True
标准类型 Boolean Char Real Integer
标准函数 Abs Arctan Chr Cos Eof Eoln Exp
Ln Odd Ord Pred Round Sin Sqr
Sqrt Succ Trunc
标准过程 Dispose Get New Pack Page Put Read
Readln Reset Rewrite Unpack Write Writeln
c．用户自定义标识符：由你自己根据需要来定义。
（2）语法上允许预定义的标准
标识符作为你自己定义的标识符使用，但最好还是不要用。
以下列举了你自己在定义标识符时可以用的字符：
A..Z,a..z,0..9和
_(下划线)，其中首位必须是字母，字母不区分大小写。
2.2 Pascal数据类型
数据是程序设计的一个重要内容，其重要特征----数据类型，确定了该数据的形、取值范围以及所能参与的运算。
Turbo Pascal 提供了丰富的数据类型，这些数据类型可以分为三大类：简单类型、构造类型和指针类型，其中简单类型可以分为标准类型（
整型、实型、字符型和
布尔型）和自定义类型（枚举型和子界型），构造类型可以分为数组类型、集合类型、
记录类型和
文件类型。这些数据类型中除了指针类型是动态数据类型外，其他的都是静态数据类型。在这些数据类型中的简单类型都是有序类型，除了实型以外的简单类型都是顺序类型，所谓顺序类型就是他们的值不仅是有序的而且是有
顺序号。
在这里主要介绍
整型、实型、字符型和布尔型四种常用的数据类型。
1.整型
一个整型数据用来存放整数。Turbo Pascal支持五种预定义整型，它们是
shortint（短整型）、 integer（整型）、 longint（
长整型）、 byte（
字节型）和
word（字类型），Turbo Pascal分别用相同的名字作为他们的标识符。每一种类型规定了相应的整数取值范围以及所占用的内存字节数。
类型 数值范围 占字节数 格式
shortint -128..128 1
带符号8位
integer -32768..32767 2 带符号16位
longint -2147483648..2147483647 4 带符号32位
byte 0..255 1 不带符号8位
word 0..65535 2 不带符号16位
Turbo Pascal规定了两个预定义
整型常量标识符maxint和maxlonint，他们各表示确定的常数值，maxint为32767， longint为2147483647，他们的类型分别是integer 和longint
2.实型
一个实型数据用来存放实数。Turbo Pascal支持五种预定义实型，它们是real（基本实型）、 single（但精度实型）、double（双精度实型）、
extended（扩展实型）、comp（装配实型），Turbo Pascal分别用相同的名字作为他们的标识符。每一种类型规定了相应的实数取值范围、所占用的内存字节数以及它们所能达到的精度
real 2.9e-39..1.7e38 6 11..12
single 1.5e-45..3.4e38 4 7..8
double 5.0e-324..1.7e308 8 15..16
Turbo Pascal支持两种用于执行实型运算的
代码生成模式：软件仿真模式和80x87
浮点模式。除了real可以在软件仿真模式下直接运行以外，其他类型必须在80x87浮点模式下运行。
一个布尔型数据用来存放逻辑值（布尔值）。布尔型的值只有两个：false和true，并且false的序号是0，true的序号是1。false 和true都是预
定义常数标识符，分别表示逻辑假和逻辑真。并且true
4.字符型
字符型用char作为
标识符。字符型必须用单引号括起来，字母作为字符型时，大小写是不等价的，并且字符型只允许单引号中有一个字符，否则就是字符串。
1.常量
(1)常量：在某个程序的整个过程中其值不变的量。
(2)常量定义：常量定义在说明部分出现。它的语法格式是：
const
<常量标识符>=<常量>；
...
<常量标识符>=<常量>；
常量标识符的类型由定义它的常量的类型决定。例如：const a=12 隐含说明a是
整型；const r=3.21 隐含说明r是实型......
(3)常量定义部分必须以保留字const开头，可以包含一个或几个常量定义，而且每个常量均以分号结束。
(4)Turbo Pascal类型常量
类型常量，又称变量常数，它是Turbo Pascal的一个扩充特性。类型常量的定义与标准Pascal规定的常数定义和变量说明有所区别。类型常量定义的语法格式：
const
<简单类型常量标识符>:简单类型=常数；
例如：
const
counter:integer=0；
flag:boolean=true；
index:0..100=0；
2.变量
(1)变量：在某个程序中的运行过程中其值可以发生改变的量
(2)变量说明：变量说明出现在说明部分。它的语法格式是：
var
<变量标识符列表>：<类型>；
...
<变量标识符列表>：<类型>；
其中，
保留字var表示开始一个变量说明部分。变量
标识符列表是一个用逗号隔开的标识符序列，冒号后面的类型是类型标识符。每个变量说明均以分号结束。
program (程序名)；
var
定义变量如：integer、real、long int 、short int、boolean(此为，标志的变量)
begin
程序开始
例如：
var
a,b,c:integer;
m,n:real;
1.算术函数
函数标识符 自变量类型 意义 结果类型
arctan 整型、实型 反正切 实型
exp 整型、实型 指数 实型
frac 整型、实型 小数部分 实型
int 整型、实型 整数部分 实型
pi 无自变量 圆周率 实型
sqr 整型、实型 平方 同自变量
例：abs(-4)=4 abs(-7.49)=7.49 arctan(0)=0.0
sin(pi)=0.0 cos(pi)=-1.0 frac(-3.71)=-0.71
int(-3.71)=-3.0 sqr(4)=16 sqrt(4)=2
2.标准函数
函数标识符 自变量类型 意义 结果类型
pred 离散类型 求前趋 同自变量
succ 离散类型 求后继 同自变量
例：odd(1000)=false pred(2000)=1999 succ(2000)=2001
odd(3)=true pred('x')='w succ('x')='y'
3.转换函数
函数标识符 自变量类型 意义 结果类型
chr byte 自变量对应的字符 字符型
ord 离散类型 自变量对应的序号 longint
round 实型 四舍五入 longint
例：chr(66)='B' ord('A')=65 round(-4.3)=-5 trunc(2.88)=2
函数标识符 自变量类型 意义 结果类型
random 无自变量 [0,1间的随机实数 real
random word [0,自变量间的随机整数) word
randomize 无自变量 初始化内部
随机数产生器 longint
upcase 字符型 使
小写英文字母变为大写 字符型
downcase 字符型 使大写英文字母变为小写 字符型
2.5 运算符和表达式
1.运算符和优先级
是实型，如果全部的运算对象都是整型并且运算不是除法，则结果为整型，若运算是除法，则结果是实型 a.算术运算符
运算符 运算 运算对象 结果类型
+ 加
整型、实型 只要有一个运算对象是实型，结果就
- 减 整型、实型 是实型，如果全部的运算对象都是整
* 乘 整型、实型 型并且运算不是除法，则结果为整型，
/ 除 整型、实型 若运算是除法，则结果是实型。
div 整除 整型 整型
mod 取余 整型 整型
运算符 运算 运算对象 结果类型
= 等于 简单类型 布尔型
<> 不等于 简单类型 布尔型
< 小于 简单类型 布尔型
> 大于 简单类型 布尔型
<= 小于等于 简单类型 布尔型
>= 大于等于 简单类型 布尔型
(2)优先级
not 1(高)
*,/,div,mod,and 2
xor,+,-,or 3
in,=,<,>,>=,<=,<> 4(低)
2.表达式
(1)
算术表达式：算术表达式是由算术运算符连接常量、变量、函数的式子。算术表达式中各个运算符的次序为： ( )-->函数-->*,/,div,mod-->+,1
(2)
布尔表达式：Turbo Pascal提供给布尔表达式以下基本操作：逻辑运算和
关系运算。
（3）数学上的表达式与pascal语言表达式的区别
数学表达式PASCAL表达式注意
2a 2*a *号不能省略
a÷b a/b 除号的写法
a≠b a<>b 不等号的写法
a≤b a<=b 小于等于号的写法
a≥b a>=b 大于等于号的写法
主要语句：
读入：Read/ReadLn：读入内容/读入内容并将读入指针转到下一行。
输出：Write/WriteLn：输出内容/输出内容并将输出指针转到下一行。
判断：ifcase
循环：forwhileuntil
退出：break(跳出循环), exit(跳出过程/函数). halt(终止程序)
其它参见Pascal 大小写
将
标识符的首字母和后面连接的每个单词的首字母都大写。可以对三字符或更多字符的标识符使用Pascal 大小写。例如：
BackColor
但pascal实际并不区分大小写。
在字符操作中，大小写有区分。比如'a'<>'A'。
程序框架program {程序名} {程序参数表};label//一般省略{标号说明};const{常量说明};type{类型说明};var{变量说明};operator {
符号名+参数}beginend;function {(函数名+
形参(形参可省略)):函数类型}begin{函数说明};end;procedure {(过程名+形参(形参可省略))}begin{过程说明};end;begin{程序语句};end。
保留字
Pascal语言中保留字可分为如下6种类型：
标识符
错误代码
常见错误
错误类型
运用
Turbo Pascal系列软件作为开发系统软件与就任软件及实施
科学计算和教学的有力工具，下发挥着越来越大的作用。也是国际和
全国青少年信息学奥林匹克竞赛指定的语言之一。从历届
信息学竞赛的情况看，它是最能出成绩和选手最欢迎的语言。以后的例子就以Turbo Pascal 7.0进行程序设计。
下面我们就以一个实例来看一看Pascal程序的结构，从中认识到Pascal语言程序的书写方式，以及其规范的
标准设计方式。
设圆的半径为R，周长为L，我们知道公式如下：
L=2πR
它的Pascal程序如下：
从以上简单的例子可以看出，Pascal程序是由程序首部、程序说明部分和程序执行部分组成。具体如下所示：