伪代码的语法规则

例如，类Pascal语言的伪码的语法规则是：在伪码中，每一条指令占一行（else if，例外）。指令后不跟任何符号（Pascal和C中语句要以分号结尾）。书写上的“缩进”表示程序中的分支程序结构。这种缩进风格也适用于if-then-else语句。用缩进取代传统Pascal中的begin和end语句来表示程序的块结构可以大大提高代码的清晰性。

pascal语言文法规则_pascal语言是一种什么语言

pascal语言文法规则_pascal语言是一种什么语言

Pascal一般所有函数 例如：case...of ,eof等等和用法

Pascal用到的数和符号

1、PASCAL语言的字符表

是ASCII字符集，主要有：

⑴26个英文字母(不分大小写)

⑵十个数字符号

⑶特殊符号。如+-/=><］［：；．等

2、标识符

以字母开头的字母数字序列(大小写等效，可跟下划线_)，用来标识常量、变量、程序、函数等。

自定义标识符时要注意遵循此规则。

3、标准标识符与保留字

标准标识符有40个，五类(false true maxint Boolean real integer char abs trunc read write)详见书P16。

保留字是Pascal语言中具有特定的含义的字符。在PASCAL7.0中书写保留字的时候，字符颜色会变为白色。一共36个保留字(program function begin end procedure var const array if then else case for to do repeat until while and div in mod not or nil)。

4、常量和变量：

程序设计中经常要用到常量和变量，这些都必须先定义后才能使用。

1）.常量指程序运行过程中，其值不能改变的量。

分为四类：

⑴整型常量

十进制整数表示，不能有小数点。Maxint表示计算机中的整数=32767，即(27-1)，由一个字节存贮，位为符号位。补码表示，范围为：-32768~32767。运算速度快。

可进行+、-、、DIV(整除)、MOD(取余)

注意不能用/，因为得到的结果可能不为整型。

⑵实型常量

包括正实数、负实数和零。运算慢，无法表示。有两种表示方法：十进制表示法和科学记数法。

可进行+、-、、/运算。整数与实数运算时自动转为实数进行运算。

⑶字符常量

字符常量是由单个字符组成的，所有字符都来自ASCII字符集。字符的数据是用两个单引号把单个字符括起来表示的。

每个字符都有一个序值(在ASCII字符集的位置)，可以用六个关系运算符来比较大小。

⑷布尔型常量

只有true和false两个值。也有序，true 为1，false为0。

布尔型有三个运算符：and or not

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

例：const pi:=3.14;

2）.变量

变量是指在程序执行过程中，其值可以改变的量。变量三要素：变量名、变量类型、变量值。

⑴变量名用一个合法的标识符来表示。

⑵变量在某一固定时刻是用来存放常量的，而常量是有类型的数据，因而变量也是有类型的。类型不能有两义性。

⑶变量值。在程序中由赋值语句来赋值。

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

例：var a,b:integer; c,d:real;

5、表达式

程序中由运算对象(作数)和运算符(作符)按照一定次序组成的有意义的式子称为表达式。

作符(算术、关系、布尔)

作数(因子(无符号常量、变量、函数调用、not 布尔因子、项、括号括起来的表达式)、项、简单表达式组成)。

具体优先顺序：

⑴括号内先算

⑵函数

⑶运算符优先顺序

NOT

/ DIV MOD AND

+ - OR

< <= > >= = <>

⑷同级运算按从左到右的次序。

注意：运算符两端，除实型和整数型外不允许为两种不同的数据类型。

表达式的数据类型根据它的值来划分。(所以表达式分为算术表达式、字符表达式、布尔表达式)

书写表达式的注意事项：

⑴只可出现圆括号；⑵运算符不能省略；⑶表达式中的所有字符必须写在同一行上。

6、标准函数的使用。

对于在程序中反复出现的程序段，我们可以把它作为一个的整体，指定一个标识符，以后作用的时候只要给出它的标识符就可以了，这样的程序段我们称为子程序。

子程序主要包括函数与过程。我们先来看一下系统内部定义的标准函数。

标准函数是由系统预先定义、用户可以直接使用的函数。

格式：函数名(自变量)；

使用时注意自变量的类型和函数的类型，两者类型可能不同(如类型转换函数)，不同函数对自变量的要求也不同。

①.算术函数

可参加算术运算，其自变量与函数值均为数值型。

⑴abs(x)。即|x|

⑵sqr(x), sqrt(x)

⑶sin(x), cos(x),arctan(x)

⑷exp(x), ln(x)

②.类型转换函数

⑴trunc(x)

⑵round(x)

⑶序号函数：ord(x)

⑷字符函数：CHR(X)的自变量为字符ASCII的十进制数值,IBMPC上取值为0到255,可打印字符为32到126。它正好与序号函数ORD(X)相反.如：CHR(65)='A',ORD(‘A')=65

③.顺序函数

在有序数据中求某个数据的前一项或后一项。

⑴前导函数:pred(x)

⑵后续函数：succ(x)

④.逻辑函数

函数值为布尔型的函数，在程序中主要用来作判断用。

⑴奇数函数odd(x)

⑵行结束函数eoln(x)

⑶文件结束函数eof(x)

回到前面的表达式进行例题讲解。

7、数据类型。

数据类型是数据的重要特征，决定了它的表示形式、取值范围和能参加的各种运算。

PASCAL的数据类型：(见书P24)

简单类型(不能再被分解)、结构类型(由其他类型组合而成)和指针类型。(静态数据类型和动态数据类型)(顺序类型、有序类型)

①.标准类型：四种。

实数类型除real外，其他的需在说明的开始部分(在const，var等前面)用{$N+}打开编译开关。

字符类型中还有字符串类型。用sting作标识符。可存取255个字符。

整型数取值范围:BYTE(0—255 8位) SHORINT(-128—127)

INTEGER(16),WORD(16),LONGINT(32)

②.自定义类型：枚举与子界。

pascal基础知识

一、次课的内容

1、 信息学奥林匹克

2、 Pascal语言；

3、 Free Pascal环境介绍；

4、 编辑运行个Pascal语言程序；

5、 Pascal程序结构。

二、第二次课内容

1、 Pascal语言基本字符集、保留字、标识符的有概念及组成；

2、 数据类型、常量、变量及说明方法；

3、 Pascal语言包含的所有数据类型；

4、 整数类型和实数类型的类型符、取值范围及可进行的运算；

5、 举例讲解上述内容的使用及对Free Pascal语言环境的进一步熟悉。

三、第三次课内容

1、 结构化程序设计思想介绍；

2、 赋值语句介绍及应用举例；

3、 Write、Wrin语句介绍及应用举例；

4、 Pascal语言的表达式；

5、 程序设计的解题步骤及应用举例。

四、第四次课内容

1、 Read、Readln语句介绍及应用举例；

2、 字符类型及逻辑类型的类型符、取值范围及可进行的运算；

3、 Randomize语句、Trunc函数及随机整数的产生；

4、 所学内容的应用举例。

五、第五次课内容

1、 复合语句介绍；

2、 顺序结构语句总结；

3、 选择结构程序设计介绍；

4、 if…then语句介绍；

5、 if…then…else语句介绍；

6、 条件语句的嵌套；

7、 本次内容的应用举例；

六、第六次课内容

1、 顺序结构及分支结构程序设计的应用举例；

2、 对循环结构的初步认识；

3、 While语句介绍及应用举例。

七、第七次课内容

1、 循环结构的介绍；

2、 For语句介绍；

3、 循环结构的嵌套；

4、 循环结构的应用；

八、第八次课内容

1、 顺序结构、选择结构、循环结构应用举例；

2、 Repeat语句介绍及应用；

3、 三种循环语句分析及比较；

九、第九次课内容

1、 文件的介绍；

2、 从文本文件中如何读数据；

3、 Assign、Reset、Read、Readln及Close的使用；

4、 读文件应用举例。

5、 Case语句介绍及应用举例。

十、第十次课内容

1、 如何将数据输出到文件中；

2、 Assign、Rewrite、Write、Wrin及Close的使用；

3、 写文件应用举例；

4、 Pascal常用函数介绍。

十一、第十一次课内容

1、 认识数组；

2、 类型的定义方法；

3、 一维数组的定义和使用；

4、 一维数组的应用举例。

十二、第十二次课内容

1、 二维数组的定义和使用；

2、 数组的简单介绍；

3、 Inc、Dec、Break、Continue语句及应用举例。

十三、第十三次课内容

1、 字符数组；

2、 字符串的特性；

3、 字符串函数；

4、 字符串的应用。

十四、第十四次课内容

1、 一维数组的查找、插入、删除；

2、 一维数组的排序；

3、 数组的复习及应用举例。

十五、第十五次课内容

1、 枚举类型的定义及应用；

2、 子界类型的定义及应用；

3、 对程序设计中所有语句的复习。

十六、第十六次课内容

1、 子程序的概念、作用及分类；

2、 函数的定义、调用及应用举例；

3、 值参数和变量参数；

4、 按值传递的执行过程；

5、 前面所学内容的应用举例。

十七、第十七次课内容

1、 过程的定义、调用及应用举例；

2、 按地址传递的执行过程；

3、 Label说明及Goto语句的简单介绍。

十八、第十八次课内容

1、 全局变量及局部变量的作用域；

2、 函数和过程的作用域；

3、 子程序的递归及应用举例；

4、 子程序的嵌套；

5、 程序说明部分的完整复习。

十九、第十九次课内容

1、 记录类型的定义及使用；

2、 记录类型的应用举例；

3、 前面所学内容的应用举例。

二十、第二十次课内容

1、 类型的定义及使用；

2、 类型的应用举例；

3、 指针类型的简单介绍；

4、 参加竞赛时应注意的一些问题；

5、 初级班后继课程的安排介绍。

科技馆信息学奥林匹克中级班内容

一、次课内容

1、 顺序结构语句复习；

2、 选择结构语句复习；

3、 循环结构语句复习；

4、 程序设计应用举例；

5、 典型试题分析。

二、第二次课内容

1、 子界类型及枚举类型典型试题分析及应用举例；

2、 数组类型典型试题分析及应用举例。

三、第三次课内容

1、程序设计应用举例；

2、函数及过程典型试题分析；

四、第四次课内容

1、 、记录的应用举例；

2、 、记录典型试题分析。

五、第五次课内容

1、程序设计中的基本算法之模拟法。

六、第六次课内容

1、程序设计中的基本算法之枚举法。

七、第七次课内容

1、程序设计中的基本算法之贪心法。

八、第八次课内容

1、程序设计中的基本算法之递归法。

九、第九次课内容

1、程序设计中的基本算法之回溯法。

十、第十次课内容

1、程序设计中的基本算法之分治法。

十一、第十一次课内容

1、 进制；

2、 二、八、十六进制和十进制的相互转换；

3、 二、八、十六进制之间的转换。

十二、第十二次课内容（排列与组合）

1、 加法原理与乘法原理；

2、 排列；

3、 组合。

十三、第十三次课内容（高精度运算）

1、 高精度数的读入和存储；

2、 高精度加法；

3、 高精度减法；

4、 高精度乘法；

5、 高精度除法。

十四、第十四次课内容（排序算法）

1、 归并排序；

2、 希尔排序；

3、 堆排序；

4、 快速排序；

5、 基数排序。

十五、第十五次课内容

1、 指针类型的复习；

2、 链表的结构及作；

3、 典型试题分析。

我这儿有资料，你把邮箱留下，我发给你

写出pascal语言中if语句的上下文无关文法的完整定义

未高精：

program sc;

var

f:array[0..100,0..100] of longint;

a,c:array[0..100] of longint;

m,n,i,j,k,total:longint;

function max(a,b:longint):longint;

begin

if a>b then max:=a else max:=b;

end;

begin

readln(n,m);

fillchar(c,sizeof(c),0);

c[0]:=1;

for i:=1 to m do c[i]:=c[i-1]2;

total:=0;

for i:=1 to n do

begin

for j:=1 to m do read(a[j]);

readln;

fillchar(f,sizeof(f),0);

for j:=1 to m do f[j,j]:=a[j]c[m];

for j:=1 to m-1 do

for k:=1 to m-j do

f[k,k+j]:=max(f[k+1,k+j]+a[k]c[m-j],f[k,k+j-1]+a[k+j]c[m-j]);

total:=total+f[1,m];

end;

wrin(total);

end.

高精（在未高精的基础上修改的）：

program sc;

type

asd=array[0..100] of longint;

var

f:array[0..100,0..100] of asd;

c:array[0..100] of asd;

a:array[0..100] of longint;

m,n,i,j,k:longint;

total:asd;

function max(a,b:asd):asd;

var

q1,q2,i:longint;

begin

q1:=a[0];q2:=b[0];

if q1>q2 then exit(a)

else if q2>q1 then exit(b)

else

for i:=q1 downto 1 do

begin

if a[i]>b[i] then exit(a)

else if a[i]

end;

exit(a);

end;

function cheng(s1:longint;s2:asd):asd;

var

i,j:longint;

begin

for i:=1 to s2[0] do

s2[i]:=s2[i]s1;

for i:=1 to s2[0]+3 do

begin

s2[i+3]:=s2[i+3]+s2[i] div 1000;

s2[i+2]:=s2[i+2]+(s2[i] mod 1000) div 100;

s2[i+1]:=s2[i+1]+(s2[i] mod 100) div 10;

s2[i]:=s2[i] mod 10;

end;

j:=i+6;

while s2[j]=0 do j:=j-1;

s2[0]:=j;

cheng:=s2;

end;

function jia(s1,s2:asd):asd;

var

q1,q2,q,i:longint;

begin

q1:=s1[0];q2:=s2[0];

if q1>q2 then q:=q1 else q:=q2;

for i:=1 to q do

begin

s1[i]:=s1[i]+s2[i];

if s1[i]>9 then

begin

s1[i]:=s1[i]-10;

s1[i+1]:=s1[i+1]+1;

end;

end;

s1[0]:=q;

if s1[q+1]<>0 then s1[0]:=q+1;

jia:=s1;

end;

begin

assign(input,'.in');

reset(input);

readln(n,m);

fillchar(c,sizeof(c),0);

c[0,0]:=1;c[0,1]:=1;

for i:=1 to m do

begin

for j:=1 to c[i-1,0] do

c[i,j]:=c[i-1,j]2;

for j:=1 to c[i-1,0] do

if c[i,j]>9 then begin

c[i,j]:=c[i,j]-10;

c[i,j+1]:=c[i,j+1]+1;

end;

c[i,0]:=c[i-1,0];

if c[i,c[i-1,0]+1]<>0 then c[i,0]:=c[i,0]+1;

end;

fillchar(total,sizeof(total),0);

total[0]:=1;

for i:=1 to n do

begin

for j:=1 to m do read(a[j]);

readln;

fillchar(f,sizeof(f),0);

for j:=1 to m do f[j,j]:=cheng(a[j],c[m]);

for j:=1 to m-1 do

for k:=1 to m-j do

f[k,k+j]:=max(jia(f[k+1,k+j],cheng(a[k],c[m-j])),jia(f[k,k+j-1],cheng(a[k+j],c[m-j])));

total:=jia(total,f[1,m]);

end;

close(input);

assign(output,'.out');

rewrite(output);

for i:=total[0] downto 1 do

write(total[i]);

wrin;

close(output);

end.

教教我，pascal语言

结构化程序设计思路由E.W.Dijkstra 和C.A.R.Hoare提出。

pascal语言程序由说明和语句组成

说明指变量说明等

语句指begin end 所包含内容

三个标准常量false,true,maxint

数据类型,整型，实型，字符型，布尔型

var i,n,t,c,d:byte;

w:word;

s,p:array[1..50]of byte;

f:array[1..50]of boolean;

procedure add;

var k:byte;

begin

for k:=1 to n do

if f[k] then inc(w,p[k]);

end;

procedure cut;

var k:byte;

begin

for k:=1 to n do

if f[k] then dec(w,p[k]);

end;

procedure print;

var i:byte;

begin

for i:=1 to d do write(s[i],' ');

wrin;

wrin(w);

end;

procedure dfs;

var j:-1..1;

k:byte;

begin

if d=n then begin print;exit;end;

for j:=-1 to 1 do

if (j<>0)and(f[c+j]) then begin

inc(d);

s[d]:=c+j;

f[c+j]:=false;

add;

dfs;

dec(d);

cut;

f[c+j]:=true;

end;

end;

begin

readln(n,c);

for i:=1 to n do readln(t,p[t]);

t:=0;

fillchar(f,sizeof(f),false);

dfs;

end.

有好多呢，这里说不完的

买本书自己看``

pascal语言里XOR、OR的意义及详细用法

or或运算

或运算符要求两个运算值，然后返回一个值，当且仅当两个运算值中有一个为1或都为1时，返回值为1。如下表：

1 or 1 == 1

1 or 0 == 1

0 or 1 == 1

0 or 0 == 0

xor 异或运算

异或运算符要求有两个运算值，然后返回一个值，当且仅当两个运算值中有一个为1但不同时为1时，返回值为1。如下表：

1 xor 1 == 0

1 xor 0 == 1

0 xor 1 == 1

0 xor 0 == 0

区别：

两个相同的东西异或的结果是假；两个不同的东西异或的结果是真。从某一方面来讲，xor和(<>)是一样的。

回答者： fp_hwh - 实习生 一级 2009-10-14 23:29

xor异或：原则:不同则真

设两个布尔型量（或表达式）A,B,则当且仅当A,B中一个为true，一个为false时，表达式A xor B为真。

or或：原则：有真则真

对于A or B,只要A,B中有一个为true,表达式A or B就为真。

xor与or间有什么联系和区别呢？

xor是我们生活中所说的或，即条件是两者中只有一个为真时；

or是逻辑上的或，即有一个为真即为真。

也就是说，A=true,B=false;则A or B值为true,A xor B值为false。

A xor B=true的条件比A or B=true的条件更严格。也就是说，如果A xor B值为true,A or B必为true。你也可以理解为xor范围比or小。

pascal中，xor与or运算不仅限于表达式和布尔型量，比如21 xor 2。这是怎么计算呢？方法是按位或（异或）。

把21，2均转化为二进制数（分别为10101，10），再右对齐，像计算加法竖式那样。在这里面0代表false，1代表true。在每位上取或（异或）。

10101

10

-------

10111

所以结果就是二进制数10111转化成十进制：23。

观察一下你还可以发现：xor，or与按位做加法对应（若结果在某位上为1，则仅在1+0=1时，不过对于or有1 or 1=1）；and就是按位做乘法（若结果在某位上为1，则仅在11=1时)。

若表达式 A<>B值为true,因为A,B要么为true，要么为false，(我不是设布尔量么）则自然是一个true，一个false。即对于布尔量、表达式的运算，xor与<>是等价的。

但对于21 xor 2,值为23；21<>2,值为true。（21<>2被视为表达式）。

异或: 二进制运算。可逆运算。1 xor 1=0，0 xor 0=0，1 xor 0=1，0 xor 1=1。

a xor b的运算方法：将a,b 转化为2进制数，再进行对比，每个数位上的0或1如果相同，那么结果就取0，如果不同就取1，将得到的结果转化为原来进制的数，就是结果。

在OI中，常用于位运算。

或运算,二进制运算．可逆运算．1 or 1=1,1 or 0=1,0 or 0=0，0 or 1=1.

“∨”表示逻辑加，规则为0∨0=0、0∨1=1、1∨0=1、1∨1=1

a or b 的运算方法：将a和b转换成2进制后,一位一位地去比较,每个数位上只要有一个为1的,那么就是1,否则为0.后再把它转换成十进制就可以了.

or或运算

或运算符要求两个运算值，然后返回一个值，当且仅当两个运算值中有一个为1或都为1时，返回值为1。如下表：

1 or 1 == 1

1 or 0 == 1

0 or 1 == 1

0 or 0 == 0

xor 异或运算

异或运算符要求有两个运算值，然后返回一个值，当且仅当两个运算值中有一个为1但不同时为1时，返回值为1。如下表：

1 xor 1 == 0

1 xor 0 == 1

0 xor 1 == 1

0 xor 0 == 0

区别：

两个相同的东西异或的结果是假；两个不同的东西异或的结果是真。从某一方面来讲，xor和(<>)是一样的。