PASCAL语言

PROGRAM example(INPUT,OUTPUT);
{this is used for s=x+y}
VAR x,y,s;ingeger;
BEGIN
    read(x,y);
    s;=x+y;
    writeln('s=',s)
WND

------------------------------
程序首部:用于指定程序的名字和列出程序中用到的文件,由程序标识符,程序名,程序参数组成

程序的说明部分

1,标号说明部分   
99: Writeln('Error');  LABEL 标号表;

2,常量定义部分   
CONST 标识符1=常量值1;

3,类型定义部分
数据类型={<简单类型>,<构造类型>,<指针类型>}

简单类型={<标准类型>,<用户自定义类型>}
标准类型={<整数类型:integer>,<实数类型:real>,<字符类型:char>,<布尔类型:boolean>}
用户自定义类型={<枚举类型>,<子界类型>}

构造类型={<集合类型>,<数组类型>,<记录类型>,<文件类型>}

类型定义的一般形式
TYPE   类型标识符1=类型1

4,变量说明部分
VAR 标识符表1:类型1;

5,过程与函数说明部分
PROCEDURE add(x,y:integer;VAR sum:ingeger)
BEGIN
    s:=x+y;
END;

一般语句:

IF 布尔表达式 THEN 语句1 ; IF 布尔表达式 THEN 语句1 ELSE 语句2

CASE 表达式 OF
    分情形表1:语句1;
END

WHILE 布尔表达式 DO 语句
REPEAT 语句 UNTIL 布尔表达式

FOR 循环变量:=初值表达式 TO 终值表达式 DO 语句
FOR 循环变量:=初值表达式 DOWNTO 终值表达式 DO 语句

输入输出:
read readln write writeln
----------------------------------------------------------------

用户自定义的数据类型
枚举类型
TYPE 类型标识符={标识符1,标识符2};

子界类型
TYPE 类型标识符=常量1,常量2;
常量1是上界
常量2是下界

集合类型
TYPE 类型标识符=SET OF 基类型

数组类型
TYPE 类型标识符=ARRAY [下标类型1,...,上标类型n] OF 成分类型

记录类型
TYPE 类型标识符=RECORD 域表 end
域表=固定部分