Turbo Pascal V7.0的Pascal的基本运用
Turbo Pascal系列软件作为开发系统软件与就任软件及实施科学计算和教学的有力工具，下发挥着越来越大的作用。也是国际和全国青少年信息学奥林匹克竞赛指定的语言之一。从历届信息学竞赛的情况看，它是最能出成绩和选手最欢迎的语言。以后的例子就以Turbo Pascal 7.0进行程序设计。
下面我们就以一个实例来看一看Pascal程序的结构，从中认识到Pascal语言程序的书写方式，以及其规范的标准设计方式。
例1：输入一个圆的半径，求出其圆周长。
设圆的半径为R，周长为L，我们知道公式如下：
L=2πR
它的Pascal程序如下：
program yzhch(input,output) ; {程序首部}
const {常量说明}
pi=3.14159
var {变量说明}
l,r:real;
begin {程序开始}
readln(r); {输入半径}
l:=2*pi*r; {计圆周长}
writeln('l=',l); {输出圆周长}
end. {结束程序}
从以上简单的例子可以看出，Turbo Pascal程序是由程序首部、程序说明部分和程序执行部分组成。具体如下所示：
program 程序名； {程序首部}
说明部分 {说明部分}
begin {程序开始}
语句1； {执行语句}
语句2； {执行语句}
…… {执行语句}
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语言建立了数据类型的概念，对描述的数据进行分类。每一种数据类型定义了一个具有相同性质的数据集合。各种数据类型的数据具有不同的性质。程序中所用到的每一个数据，包括常量和变量都有一个和它相联系的类型。由此决定了数据所具有的值，也决定了对该数据所能进行的操作。
Turbo Pascal语言中数据具有丰富的类型，按它们的特点可以分为简单类型、构造类型、指针类型和过程类型四大类，如图下所示。
其中，标准类型用语言系统预先定义的标准标识符表示，整型用integer表示，实型用real表示，布尔型用boolean表示，字符型用char表示。
二、常量
常量是指在程序中使用的一些具体的整型数、实型数和字符串。
⑴整型数：如9、3、-5、0等。
⑵实型数：如3·1、-6.1E+20等。
⑶字符串：是用单引号括起来的一串字符，如，’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语言对常量定义有如下要求：
⑴常量定义要放在程序的常量定义部分，即程序首部之后，执行部分之前。
⑵必须遵循先定义后使用的原则，即只有已经定义的常量标识符，才能在程序中
使用。
三、变量
在程序执行过程中其值可以改变的数据，称为变量。每个变量都要有一个名称，这就是变量名。变量名由用户自己定义，但必须符合标识符的规定。
在一个程序中，一个变量只能属于一种确定的数据类型。因此，程序中出现的每个变量都必须说明其数据类型，这样就规定了该变量的取值范围，也决定了对该变量所能执行的运算操作。
变量的类型，可以是标准数据类型integer、real、boolean和char，也可以是用户自定义的各种类型。
变量说明形式是：一个变量标识符或由逗号隔开的多个变量标识符在它的冒号：后面说明其数据类型。
在Turbo Pascal程序中，变量说明要写在变量说明部分中。
变量说明部分的一般形式：
var
（变量说明1）；
（变量说明2）；
……（变量说明n）；
其中var是保留字，表示一个变量说明部分开始。一个var可以含有多个不同的变量说明，每个变量说明之间用分号隔开，有时称被分号隔开的变量说明为变量说明项。例如：
var
x，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 ⒁ 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 Mod l000 = 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）等ASCⅡ码的所有字符。Turbo Pascal支持扩展ASCⅡ码，共包括256个字符。但非印刷字符是不能在标准显示上显示或打印输出。在计算机内部，字符集的元素是以该元素在字符集内的顺序位置来标记的，位置取值范围为0~255，我们称这些整数为字符在字符集内的序数值或序号。每个字符型数据在内存中占一个字节。将字符用单引号括起来，即成字符常数，如，’X’，’7’，’?’。字符常数可按字符的序数值确定大小关系，也就是说它们的大小由它们所对应的ASCⅡ码值决定，如：’Y’，’Z’，’A’<；’a’。
由于采用ASCⅡ码，字符依ASCⅡ码序号排列。这样，字符与ASCⅡ码序号有一一对应的映射关系。
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（异或）
