Pascal是一种计算机通用的高级程序设计语言。它由瑞士NiklausWirth教授于六十年代末设计并创立。Pascal的取名是为了纪念十七世纪法国着名哲学家和数学家BlaisePascal。Pascal语言语法严谨，层次分明，程序易写，具有很强的可读性，是第一个结构化的编程语言。Pascal计算机程序教程如今已经有专业化课程，并且越来越完善和严格化。Pascal有5个主要的版本，分别是UnextendedPascal、ExtendedPascal、Object-OrientedExtensionstoPascal、BorlandPascal和DelphiObjectPascal。

创立背景

Pascal由瑞士苏黎世联邦工业大学的Niklaus Wirth教授于六十年代末设计并创立。1971年，瑞士联邦技术学院尼克劳斯·沃尔斯（N.Wirth）教授发明了另一种简单明晰的计算机程序设计语言，这就是以电脑先驱帕斯卡的名字命名的Pascal语言。Pascal语言语法严谨，一出世就受到广泛欢迎，迅速地从欧洲传到美国。

Pascal是最早出现的结构化编程语言，具有丰富的数据类型和简洁灵活的操作语句。

Pascal基于ALGOL编程语言，为纪念法国数学家和哲学家布莱兹·帕斯卡而命名。维尔特后来开发了类似Pascal的Modula-2和Oberon。在开发Pascal之前，维尔特开发了语言Euler，然后开发了Algol-W。

最初，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语言有益于培养良好的程序设计风格和习惯。

IOI(国际信息学奥林匹克竞赛)把Pascal语言作为三种程序设计语言之一，NOI(全国奥林匹克信息学竞赛)把Pascal语言和c语言、c++语言作为竞赛使用程序设计语言，在大学中Pascal语言也常常被用作学习数据结构与算法的教学语言。

高级语言发展过程中，PASCAL是一个重要的里程碑。1971年，瑞士联邦技术学院尼克劳斯·沃尔斯（N.Wirth）教授发明了另一种简单明晰的电脑语言，这就是以电脑先驱帕斯卡的名字命名的PASCAL语言。PASCAL语言语法严谨，编程语言。沃尔斯一生还写作了大量有关程序设计、算法和数据结构的著作，因此，他获得了1984年度“图灵奖”。

缺点

传统PASCAL的标准库中缺乏对网络编程的支持，并且仅通过自带的graph单元难以实现较好的图形界面（GUI），这些缺点大多需要嵌入汇编语言代码才能得到解决，缺乏与机器语言的接口。

另一方面，作为一个面向过程的编程语言，和90年代兴起的面向对象的语言相比，不利于大型软件的开发。

尽管Pascal非常流行（然而在八十到九十年代时比21世纪更加流行），依据维尔特的对这种语言的定义来构建Pascal，使它不适合在非教学的场合使用，这遭到了广泛的批评。 推广了C语言的Brian Kernighan早在1981年就在他的论文《Why Pascal Is Not My Favourite Programming Language》对Pascal提出了严厉的抨击。

主要版本

Pascal有5个主要的版本，分别是UnextendedPascal、ExtendedPascal、Object-OrientedExtensionstoPascal、BorlandPascal和DelphiObjectPascal。

其中，UnextendedPascal、ExtendedPascal和Object-OrientedExtensionstoPascal是由Pascal标准委员会所创立和维护的，UnextendedPascal类似于瑞士NiklausWirth教授和K.

Jensen于1974年联名发表的Pascal用户手册和报告，而ExtendedPascal则是在其基础上进行了扩展，加入了许多新的特性，它们都属于正式的Pascal标准；Object-OrientedExtensionstoPascal是由Pascal标准委员会发表的一份技术报告，在ExtendedPascal的基础上增加了一些用以支持面向对象程序设计的特性，但它属于非正式的标准。

BorlandPascal和DelphiObjectPascal是由Borland公司专门为其开发的编译工具设计的Pascal语言，前者是用于DOS的TurboPascal系列和Windows3.x的TurboPascalforWindows的传统高级语言，后者是用于Windows的Delphi和Linux的Kylix的面向对象程序设计语言，它们都不是正式的Pascal标准，具有专利性。但由于TurboPascal系列和Delphi功能强大并且广为流行，BorlandPascal和DelphiObjectPascal已自成为一种标准，为许多人所熟悉

基本符号

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语言除了可以使用以上规定的字符外，不得使用其他任何符号；

注：Pascal中div是整除，mod是求余；

Free Pascal 中，大写字母与小写字母没有区别，只是除了字符串中的字母，即是说：A与a被认作同一个字母。

ASCII码

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程序的编译系统。

Pascal只是一门语言，而Turbo Pascal/Free Pascal是编译器，这两个是不能比较的 。

你可以把两个语言放在一起比较，或者两个编译器放在一起比较 。

在中国的信息学奥林匹克竞赛中，过去比较常用的Pascal编程工具是Turbo 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

随着Turbo Pascal逐渐被淘汰，全国信息学奥林匹克竞赛决赛（NOI）全国信息学奥林匹克联赛决赛（NOIP）和国际信息学奥林匹克竞赛（IOI）已经指定Free Pascal为比赛使用的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还进一步加强了单元支持、面向对象程序设计的支持、显卡（声卡）的支持、图形高级覆盖的支持、Windows//Linux//OS/2//..等众多系统的支持。在FP的较稳定版本中，可以方便的利用Win32编译模式，编译出Windows应用程序，与Delphi的功能相当。同时对动态连接库、控件、数据库、文件、网络、OpenGL的深入支持，使得 FP 在各种 Pascal编译系统中脱颖而出。

更值得提出的是，FP支持Delphi及C++的部分语言，例如：A+=2这样的C Style语言，在FP里完美支持。

FP中支持单目、双目操作符，即所有版本的Pascal的符号和“@”等特殊符号。

FP 支持运算符重载，即可以重新自己定义运算符。

FP现为竞赛推荐工具。

最新发布版本为 2014 年3 月11 日发布的 2.6.4。

最新 bugfix 版本为 svn repo 里的 2.4.3。

最稳定版本为2.4.4。

P.S：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 Pascal Editor含有CP代码快速输入模式，这项功能使您可以在编写程序时使用来自其他语言的语法，甚至一些伪代码表达方式。当您完成输入时，CP会自动将这些代码转换为Pascal代码，而且支持中文，弥补了Free Pascal不支持中文的缺陷。

在 CP Pascal Editor 中含有中文错误提示信息，并大幅度提高编辑速度，而且它的稳定性好，支持语法高亮，支持代码中输入中文，还具有Math与Crt等常用单元。虽然它的界面还停留在传统的pascal编程界面，有些老套，但从功能上来看十分适合Pascal语言编写者使用。

优点：1、中文界面，有中文错误提示信息。2、稳定性好。

缺点：1、界面简陋。2、现已被证实使用crt单元时会出现PPU 100版本错误。

语言知识

语言概述

Pascal语言是一种算法语言，它是瑞士苏黎世联邦工业大学的沃思教授于1968年设计完成的，1971年正式发表。Pascal语言是在ALGOL60的基础上发展而成的。它是一种结构化的程序设计语言。它的功能强、编译程序简单，是70年代影响最大一种算法语言。

从使用者的角度来看，Pascal语言有以下几个主要的特点：

⒈ 结构化

Pascal可以方便地书写出结构化程序，保证了程序的正确性和易读性。在结构化这一点上，Pascal比其它算法语言更好。

⒉ 数据类型丰富

Pascal是一种强类型语言。它提供了整数型、实数型、字符型、布尔型、枚举型、子界型以及由以上类型构成的数组类型、集合类型、记录类型和文件类型。此外，还提供了其它许多语言中所没有的指针类型。丰富的数据结构和上述的结构化性质，使得Pascal可以被方便地用来描述复杂的算法。

⒊ 适用性好

既适用于数值运算，也适用于非数值运算领域。有些语言只适用于数值计算，有些语言则适用于商业数据处理和管理领域。Pascal的功能较强，能广泛应用于各种领域。

⒋ 书写较自由

得益于语句末的分号做分隔符，Pascal允许一行写多个语句，一个语句可以分写在多行上，这样就可以使Pascal程序写得象诗歌格式一样优美，便于阅读,但一行不可超过257个字符。

由于以上特点，许多学校选Pascal作为程序设计课程中的一种主要的语言。它能给学生严格而良好的程序设计的基本训练，培养学生结构化程序设计的风格。

基本结构

任何程序设计语言都有一定的规则。使用Pascal语言必须遵循其本身所规定的规则来编写程序。尽管不同版本的Pascal语言所采用的符号的数量、形式不尽相同，但其基本成分一般都符合标准Pascal的规定。下面我们首先来了解Pascal语言的程序基本结构。

为了明显起见，先举一个最简单的Pascal程序例子：

【例1】

1 programli1(input,output);//程序首部

2 var

3 r,l,s:real;//定义变量

4 begin

5 write('inputr:');

6 readln(r);

7 s:=pi*r*r;

8 //pi是pascal系统定义的常量，即圆周率，FP中按实数输出为3.1415926535897932E+0000

9 l:=2*pi*r;

10 writeln('s=',s:0:6);

11 //":0:6"是双场宽，用于实型变量的输出，":0"是场宽，"：6"是小数部分长度

12 writeln('l=',l:0:6);

13 end.//结束

从这个简单的程序可以看到：

1、一个Pascal程序分为两个部分：程序首部和程序体（或称分程序）。

2、程序首部是程序的开头部分，它包括：

⑴程序标志。用"program"来标明这是一个Pascal 程序。Pascal规定任何一个控制台Pascal程序的首部都必须以此字开头。在Free Pascal中，首部也可省略。

⑵程序名称。由程序设计者自己定义，如例中的li1。在写完程序首部之后，应有一个分号。

3、程序体是程序的主体，在有的书本里也称"分程序"。程序体包括说明部分（也可省略）和执行部分两个部分。

⑴说明部分用来描述程序中用到的标号、常量、类型、变量、函数、过程等。正如示例中的“var”标注定义变量的名称、类型，其它的标注字段为：label（标号）、const（常量）、type（类型）、var（变量）、function（函数）、procedure（过程）。

Pascal规定，凡程序中用到的所有变量、符号常量、数组、过程与函数、记录、文件等数据都必须"先说明，再使用"。

⑵执行部分的作用是给出需要计算机执行的操作。

执行部分以"begin"开始，以"end"结束，其间有若干个语句，一般为了易于阅读，begin..end中的语句应空2格（不包括“begin”和“end”），语句之间以分号隔开。执行部分之后有一个句点，表示整个程序结束。

4、Pascal程序的书写方法比较灵活。书写程序应结构清晰、容易阅读理解。在编写程序时希望读者尽量模仿本书中例题程序格式和缩进（两个空格或一个Tab）。

5、在程序中，一对大括号间的文字称为注释（也可用(*、*)）。注释的内容由人们根据需要书写，可以用英语或汉语表示。注释可以放在任何空格可以出现的位置。编译器对注释不予理睬。

使用

信息学竞赛使用的Pascal语言系统是Free Pascal，下面我们就来学习Free Pascal的使用。

1．系统的启动在运行系统目录下的启动程序fp.EXE，即可启动系统。屏幕上出现如图1所示的集成环境。

2．Free Pascal系统集成环境简介

最顶上一行为主菜单。中间蓝色框内为编辑窗口，在它个编辑窗口内可以进行程序的编辑。最底下一行为提示行，显示出系统中常用命令的快捷键，如打开一个文件的快捷键为F3，将当前编辑窗口中文件存盘的快捷键为F2，获得系统帮助的快捷键为F1，等等。

3．新建程序窗口

按F10进行主菜单，选择FILE菜单，执行其中New命令。就可建立一个新的程序窗口（默认文件名为Noname00.pas或Noname01.pas等）。

4．程序的输入、编辑与运行

在当前程序窗口中，一行一行的输入程序。程序窗口是一个编辑器。所以对程序的编辑与其它编辑器相似，类似记事本程序。

当程序输入完毕之后，一般要先按Alt+F9（或执行compile菜单中compile命令）对程序进行编译。如果程序有语法错误，则会在程序窗口的下方显示错误信息。若无语法错误，则窗口正中央会出现一个对话框，提示编译成功。接下来，我们可以运行程序了。

程序的运行可以通过按ALT+R打开RUN菜单中的RUN命令，或直接按快捷键CTRL+F9。则可以在用户窗口中输出运行结果。通常在程序运行结束后系统回到Pascal系统的集成环境，因此要查看运行结果，要按ALT+F5将屏幕切换到用户屏幕。

5．程序的保存与打开

当我们想把程序窗口中的程序存入磁盘时，可以通过按F2键(或执行File菜单中的save命令)来保存程序。第一次保存文件时屏幕上会出现一个对话框要求输入文件名(默认扩展名为.pas)。

当我们要将磁盘上的程序文件中的Pascal程序装入窗口时，可按F3(或执行File菜单中的Open命令)来装入程序，此时系统也会弹出一个对话框要求输入要打开的文件名，或直接在文件对话框列表中选择所要的文件，然后回到打开文件。（.pas文件，可以由记事本打开）

保留字

Pascal语言中保留字可分为如下6种类型：

1、程序、函数、过程的符号：program、function、procedure；

2、说明部分的专用定义符号：array、const、file、lable、packed、var、record、set、type、of；

3、语句专用符号：case、do、downto、else、for、goto、if、repeat、then、to、until、while、with、forward；

4、运算符号：and、not、or、in、div、mod；

5、分隔符号：begin、end；

6、空指针常量：NULL。

标识符

标准常量：false，true，maxint.

标准类型：integer，real，char，string，boolean，text.

标准文件：input,output.

标准函数：abs,arctan,chr,cos,eof,eoln,exp,ln,odd,ord,pred,round,sin,sqr,sqrt,succ,trunc.

标准过程：get,new,pack,page,put,read,readln,reset,rewrite,unpack,write,writeln.

real 实数

integer 整型

longint 长整型

shortint 短整型

int64 超长整型

single 单精度

double 双精度

char 单个字符

string字符串型

ansistring内存字符串型

int64 -2^63-2^63-1的整数类型

qword无符号的整型(0~2^64-1)

begin 开始

end 结束

if 如果

for … to …. do 循环

read 输入 (readln 输入并换行)

write 输出（writeln 并换行输出）

then 那么（常与if连用）

else 否则 (常与if和then连用，当if后面的条件为假时，程序就会执行else后的语句)

boolean布尔型

true 真

false 假

错误代码

常见错误

1无效DOS功能号

2文件未找到

3路径未找到

4打开文件过多

5禁止文件存取

6无效文件句柄

12无效文件存取代码

15无效驱动器号

16不能删除当前目录

17不能跨驱动器改文件名

100磁盘读错误

101磁盘写错误

102文件变量未赋值

103文件未打开

104文件未用输入方式打开

105文件未用输出方式打开

106无效数字格式

150磁盘写保护

151未知单元

152驱动器未准备好

153未知命令

154数据CRC校验错

155驱动器请求的结构长度错

156磁盘定位错

157未知媒介类型

158扇区未找到

159打印机缺纸

160设备写失败

161设备读失败

162硬件故障

200被零除

201范围检查错

202堆栈溢出错

203堆溢出错

204无效指针操作

205浮点上溢出

206浮点下溢出

207无效浮点运算

208未安装覆盖管理程序

209覆盖文件读错

210对象未初始化

211调用抽象方法

212流登计错

213**下标越界

214**溢出

215算术上溢错误

216存取非法

217控制-C

218授权指令

219无效的TYPECAST

220无效的变体TYPECAST

221无效的变体操作

222没有变体方法调用DISPATCHER

223不能建立变体数组

224变体不包含数组

225变体数组边界错误

226TLS初始化错误

错误类型

1内存溢出

2缺标识符

3标识符未定义

4标识符重定义

5语法错误

6实型常量错

7整型常量错

8字符串常量跨行

9文件嵌套过多

10非正常文件结束

11行过长

12缺类型标识符

13打开文件过多

14无效文件名

15文件未找到

16磁盘满

17无效编译指示

18文件过多

19指针定义中未定义类型

20缺变量标识符

21类型错误

22结构过长

24文件分量不能为文件

25无效字符串长度

26类型不匹配

27无效子界基类型

28下界大于上界

29缺有序类型

30缺整型常数

31缺常数

32缺整型或实型常数

33缺指针类型标识符

34无效的函数结果类型

35缺标号标识符

36缺BEGIN

37缺END

38缺整型表达式

39缺有序表达式

40缺布尔表达式

41操作数类型与操作符不匹配

42表达式错

43非法赋值

44缺字段标识符

45目标文件过长

46未定义外部标识符

47无效*.OBJ文件记录

48代码段过长

49数据段过长

50缺DO

51无效PUBLIC定义

52无效EXTRN定义

53EXTRN定义过多

54缺0F

55缺INTERFACE

56无效重定位引用

57缺THEN

58缺T0或DOWNTO

59未定义的向前引用

60过程过多

61无效类型转换

62被零除

63无效文件类型

64不能读写该类型的变量

65缺指针变量

66缺字符串变量

67缺字符串表达式

68单元循环引用

69单元名不匹配

70单元版本不匹配

71单元重名

72单元文件格式错误

73缺IMPLEMENTATI0N

74常数与CASE类型不相匹配

75缺记录变量

76常数越界

77缺文件变量

78缺指针变量

79缺整型或实型表达式

80标号不在当前块中

81标号已定义

82标号未定义

83无效参数

84缺UNIT

85缺“;”

86缺“:”

87缺“,”

88缺“(”

89缺“)”

90缺“=”

91缺“:=”

92缺“[”或“(.”

93缺“]”或“.)”

94缺“.”

96变量过多

97无效FOR控制变量

98缺整型变量

99此处不允许用文件

100字符串长度不匹配

101无效字顺序

102缺字符串常数

103缺整型或实型变量

104缺有序变量

105INLINE错

106缺字符表达式

107重定位项过多

112CASE常量越界

113语句错

114不能调用中断过程

116必须在8087方式下编译

117未找到目标地址

118此处不允许包含文件

120缺NIL

121无效限定符

122无效变量引用

123符号过多

124语句部分过长

126文件必须为变量参数

127条件符号过多

128条件指令错位

130初始条件定义错

131过程和函数头与前面定义的不匹配

132严重磁盘错误

133不能计算该表达式

134表达式错误结束

135无效格式说明符

136无效间接引用

137此处不允许结构变量

138无SYSTEM单元不能计算

139不能存取该符号

140无效浮点运算

141不能将覆盖编译至内存

142缺过程和函数变量

143无效过程或函数引用

144不能覆盖该单元

147缺对象类型

148不允许局部对象类型

149缺VIRTUAL

150缺方法标识符

151不允许虚拟构造方法

152缺构造方法标识符

153缺释放方法标识符

154FAIL只允许在构造方法内使用

155无效的操作符和操作数组合

156缺内存引用

157不能加减可重定位符号

158无效寄存器组合

159未激活286/287指令

160无效符号引用

161代码生成错

162缺ASM

运用

Turbo Pascal系列软件作为开发系统软件与就任软件及实施科学计算和教学的有力工具，下发挥着越来越大的作用。也是国际和全国青少年信息学奥林匹克竞赛指定的语言之一。从历届信息学竞赛的情况看，它是最能出成绩和选手最欢迎的语言。以后的例子就以Turbo Pascal 7.0进行程序设计。

下面我们就以一个实例来看一看Pascal程序的结构，从中认识到Pascal语言程序的书写方式，以及其规范的标准设计方式。

例1：输入一个圆的半径，求出其圆周长。

设圆的半径为R，周长为L，我们知道公式如下：

L=2πR

它的Pascal程序如下：

1 programyzhch(input,output);{程序首部}

2

3 const{常量说明}

4 pi=3.14159

5

6 var{变量说明}

7

8 l,r:real;

9

10 begin{程序开始}

11

12 readln(r);{输入半径}

13

14 l:=2*pi*r;{计圆周长}

15

16 writeln('l=',l);{输出圆周长}

17

18 end.{结束程序}

从以上简单的例子可以看出，Pascal程序是由程序首部、程序说明部分和程序执行部分组成。具体如下所示：

1 program程序名;{程序首部}

2

3 说明部分{说明部分}

4

5 begin{程序开始}

6

7 语句1；{执行语句}

8

9 语句2；{执行语句}

10

11 ……

12 {执行语句}

13

14 end.{结束程序}

组成

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 l0 = 1 (个位数)

(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语言允许实型数使用下列运算符进行运算。

运算符：+、-、*、/

分别表示加、减、乘和除。其中"/"叫实数除，即使两个整型数相除，其结果也总是实型，如： 7/2=3.5 6/3=2.0

3、字符型

用标准标识符Char标明字符型。字符型数据可以是字母、符号、数字(0-9)等ASCII码的所有字符。Turbo Pascal支持扩展ASCII码，共包括256个字符。但非印刷字符是不能在标准显示上显示或打印输出。在计算机内部，字符集的元素是以该元素在字符集内的顺序位置来标记的，位置取值范围为0~255，我们称这些整数为字符在字符集内的序数值或序号。每个字符型数据在内存中占一个字节。将字符用单引号括起来，即成字符常数，如，’X’，’7’，’?’。字符常数可按字符的序数值确定大小关系，也就是说它们的大小由它们所对应的ASCII码值决定，如：’Y’，’Z’，’A’<’a’。

由于采用ASCII码，字符依ASCII码序号排列。这样，字符与ASCII码序号有一一对应的映射关系。

4、布尔型

一个布尔型数据用来存放逻辑值，或称布尔值。Turbo Pascal支持预定义布尔型，以标准标识符Boolean表示。Boolean一词，系根据19世纪英国数学家George boole (1815-1864)的名字而得，George boole为现代布尔代数之父。布尔型数据的值只有两个：True(逻辑真)和False(逻辑假)。布尔型是顺序类型，规定False<TRUE，FALSE的序号为0，TRUE的序号为1。

逻辑运算的结果只有两个：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的单位为弧度

指数函数Exp (x)：函数值为e*x

对数函数Ln (X)：函数值为x的自然对数

平方根函数的Sqrt (x)：函数值为x的平方根

反正切函数Arctan(x)：函数值为x的反正切，单位为弧度

随机函数Random：无自变量时，函数值取(0,1)间的随机小数；有自变量且为Word类型时，函数值取(0，自变量)间的随机整数。

三、字符类型函数

Turbo Pascal语言提供如下自变量为字符型的标准函数，其中Ch为字符型。

后继函数Succ (ch)：例如，Succ (’8’)=’9’ Succ (’E’)=’F’

对字符集的最后一个字符，Succ函数无意义。

前趋函数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 加法运算 32+2=34

– 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、表达式的运算优先顺序

在进行表达式的转换过程中，必须了解各种运算的优先顺序，使转换后的表达式能满足数学公式的运算要求。运算优先顺序为：

括号→函数→乘方→乘、除→加、减→字符连接运算符→关系运算符→逻辑运算符

如果同级的运算是按从左到右次序进行；多层括号由里向外。

例：

（10+6）*3^2*COS(1)/2*8+7

① ④ ③ ⑤ ② ⑥ ⑦ ⑧

Sqrt(Abs(p/n-1))+1

④ ③ ① ② ⑤

2.1 Pascal字符与符号

1．标识符

(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，FUNTION，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

标准文件　Input　Output

c．用户自定义标识符：由你自己根据需要来定义。

（1）选用的标识符不能和保留字相同。

（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支持两种用于执行实型运算的代码生成模式：软件仿真模式和80×87浮点模式。除了real可以在软件仿真模式下直接运行以外，其他类型必须在80×87浮点模式下运行。

3.布尔型

一个布尔型数据用来存放逻辑值（布尔值）。布尔型的值只有两个：false和true，并且false的序号是0，true的序号是1。false 和true都是预定义常数标识符，分别表示逻辑假和逻辑真。并且true<false。boolean是布尔型的标识符。

4.字符型

字符型用char作为标识符。字符型必须用单引号括起来，字母作为字符型时，大小写是不等价的，并且字符型只允许单引号中有一个字符，否则就是字符串。

2.3常量与变量

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;

2.4　标准函数

1.算术函数

函数标识符　 自变量类型　意义　结果类型

abs　整型、实型　绝对值　同自变量

arctan　整型、实型　反正切　实型

cos　整型、实型　余弦　实型

exp　整型、实型　指数　实型

frac　 　整型、实型　小数部分　实型

int　整型、实型　整数部分　实型

ln　整型、实型　自然对数　实型

pi　 无自变量　圆周率　实型

sin　整型、实型　正弦　实型

sqr　整型、实型　平方　同自变量

sqrt　 整型、实型　平方根　实型

例：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.标准函数

函数标识符　自变量类型　意义　结果类型

odd　 整型　判断奇数　布尔型

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

trunc　实型　截断取整　longint

例：chr(66)='B'　ord('A')=65　round(-4.3)=-5　trunc(2.88)=2

4.杂类函数

函数标识符　自变量类型　意义　结果类型

random　无自变量　[0,1间的随机实数　real

random　word　[0,自变量间的随机整数)　 word

randomize 　无自变量　初始化内部随机数产生器　longint

upcase　字符型　使小写英文字母变为大写　字符型

downcase　字符型　使小写英文字母变为大写　字符型

2.5　运算符和表达式

1.运算符和优先级

(1)运算符

是实型，如果全部的运算对象都是整型并且运算不是除法，则结果为整型，若运算是除法，则结果是实型　a.算术运算符

运算符　运算　运算对象　结果类型

+　加　整型、实型　只要有一个运算对象是实型，结果就

-　减　整型、实型　是实型，如果全部的运算对象都是整

*　乘　整型、实型　型并且运算不是除法，则结果为整型，

/　除　整型、实型　若运算是除法，则结果是实型。

div　整除　整型　整型

mod　取余　整型　整型

b.逻辑运算符

运算符　运算　运算对象　结果类型

not　逻辑非　布尔型　布尔型

and　逻辑与　布尔型　布尔型

or　逻辑或　布尔型　布尔型

xor　逻辑异或　布尔型　布尔型

c.关系运算符

运算符　运算　运算对象　结果类型

=　等于　简单类型　布尔型

<>　 不等于　简单类型　布尔型

<　小于　简单类型　布尔型

>　大于　简单类型　布尔型

<=　 小于等于　简单类型　布尔型

>=　 大于等于　简单类型　布尔型

(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。