PASCAL语言简介

第一个程序

Pascal语言的编译器有很多，我们这里以Dev-Pascal为主要编程工具。该软件界面如下：

我们输入如下代码后编译运行。

1 2 3 4 5 program my_program; {程序首部,程序名或简单说明} begin {程序开始的标志}

write('Hello,World'); {屏幕上输出单引号下的内容} readln; {等待操作者按一次回车}

end. {程序结束的标志}

如果没有输入错误的话，计算机应能在黑色背景上显示“Hello,World”。例：计算a+b的值。

1 2 3 program circle;

var

a,b,x:integer;{定义变量}

1.点击New source file按钮新建一源文件

2.输入代码并保存，保存路径不得有中文字符

3.编译并运行

4 5 6 7 8 9 10 begin

a:=100;

b:=50;

x:=a+b;

writeln('a+b=',x);{输出并换行} readln;

end.

Pascal字符与符号

1．标识符

(1) 标识符的定义：标识符就是以字母开头的字母数字序列，有效长度为63个字符，并且大小写等效。可以用来标示常量、变量、程序、函数等。

(2) 标识符的分类：

a.保留字(关键字)

所谓保留字是指在Pascal语言中具有特定的含义，你必须了解它的含义，以便于正确的使用，否则会造成错误。下面是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

Pascal数据类型

Pascal 提供了丰富的数据类型，在这里主要介绍整型、实型、字符型和布尔型四种常用的数据类型。

1.整型

一个整型数据用来存放整数。Pascal支持五种预定义整型，它们是shortint（短整型）、integer（整型）、longint（长整型）、byte（字节型）和word（字类型）。每一种类型相应

的整数取值范围以及所占用的内存字节数见下表：

值，maxint为32767，longint为2147483647，他们的类型分别是integer 和longint

2.实型

一个实型数据用来存放实数。Pascal支持五种预定义实型，它们是single（单精度实型）、real（基本实型）、double（双精度实型）、extended（扩展实型）、comp（装配实型）。每一

例如下面的程序：

3.布尔型

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

4.字符型

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

常量和变量

1.常量:

它的语法格式是：

const

<常量标识符>=<常量>;

例如：

const

counter:integer=0;

flag:boolean=true;

index:0..100=0;

2.变量:

它的语法格式是：

var

<变量标识符列表>:<类型>;

例如：

var

a,b,c:integer;

m,n:real;

标准函数

sin(pi)=0.0 cos(pi)=-1.0 frac(-3.71)=-0.71 int(-3.71)=-3.0 sqr(4)=16 sqrt(4)=2

odd(3)=true pred('x')='w succ('x')='y'

运算符和表达式

输入输出语句

自定义场宽：

例如:

设置整型时：

Writeln(i:6,ch:5);

设置实型数据时：

Writeln(r:10:4);

2．输入语句：

例如：

Read(a,b,c);

Readln(a,b,c);

注意：如果输入语句中有ln则给程序中变量输入完数据后，清空键盘缓冲区，没有ln 则输入后不清空键盘缓冲区。

Pascal语句结构

IF语句

IF语句的一般格式是：

IF 条件

THEN 语句1{条件为真时的响应、处理}

ELSE 语句2；{条件为假时的响应、处理}

使用条件语句时要注意：

1、条件语句是一个语句。IF、THEN、ELSE都是语句的一个部分。所以它只能有一

个“；”作为分隔符，放在句子的结束，特别要注意不能放在ELSE 之前。

2、如果我们的程序只需对条件为真的情况作出处理，不需要处理条件为假的情况，

则IF语句省略ELSE分句，格式变成：

3、if语句可以多层嵌套。嵌套时为了避免误解，可以用begin ,end括起嵌套部分；

else分句一般和最近的if分句配套：

IF 条件THEN

BEGIN

if 条件1 then …… else ……；

END

ELSE

BEGIN

if 条件2 then …… else ……；

End；