Pascal相关知识备忘（以free Pascal2.04为语言载体）熟练掌握并灵活使用以下Pascal语言相关知识：
（一）、常用运算：
1、算术运算：+、－、*、／、DIV、MOD
2、字符串运算：+（字符串连接）
3、集合运算：+（并集）、*（交集）、一（差集）、in
2、关系运算：>、<、=、<>、>=、<=
3、逻辑运算：NOT、AND、OR、XOR
（二）、常用子程序
1、求绝对值函数abs(x)如：abs(3)返回值为3；abs(-3.1)返回值为：3.1
2、取整函数int(x)定义：function Int(X:Real):Real;
如int(3.6)返回值为：3.0；int(-3.6)返回值为：-3.0
3、截尾函数trunc(x)定义：function Trunc(X:Real):Longint
如trunc(3.6)返回值为：3；trunc(-3.6)返回值为：-3
4、四舍五入函数round(x)
如R:=round(123.456);{123}R:=round(12.56);{13}
R:=round(-123.456);{-123}R:=round(-12.56);{-13}
5、取小数函数frac(x)
如R:=Frac(123.456);{0.456};R:=Frac(-123.456);{-0.456}
6、求平方根函数sqrt(x)和平方函数sqr(x)
如：R:=sqrt(4);{2.0};R:=sqr(4);{16}
7、随机数函数function random[(range:word)]:<same type>
randomize随机数初始化语句
random返回)1,0[之间的随机实数
,0[range随机整数如：random(5)返回0、1、2、3、4共5个数random(range)返回)
8、求字符x对应序号函数ord(x)如R:=ord(‘A’);{65}
9、求序号x对应字符函数chr(x)如R:=chr(65);{‘A’}
10、将字符串小写转换为大写函数upcase(st)如R:=upcase(‘AbcD’);{‘ABCD’}
11、求前趋函数pred(x)如R:=pred(‘B’);{‘A’}
12、求后继函数succ(x)如R:=succ(‘B’);{‘C’}
13、判断x是否为奇数函数odd(x)如R:=odd(7);{TRUE}；如R:=odd(8);{FALSE}
14、字符转换为数值过程val(str,a,b)
如，执行语句val(‘2.4’,a,b)；后，a值为：2.4
执行语句val(‘2c4’,a,b)；后，a为：0，b为：2
15、数值转换为字符过程Str（a,st）
如，执行语句str(12,st)；后，st值为：’12’
16、求字串st长度函数length(st)如R:=length(‘ABC’);{3}
17、函数Pos(st1,st)：查st1在st里的起始位置，整型。
如R:=pos(‘cd’,’abcde”);{3}
18、函数Copy(st,a,b)：提取st里第a个位置的b个字符。
如R:=copy(‘abcdef’,2,3);{‘bcd’}
19、过程Delete(st,a,b)：删除st中第a个位置的b个字符
如，执行语句:
st=’abcdef’;delete(st,2,3);
后，st值为：’aef’
20、过程Insert(st1,st,a)：把st1插入st的第a个位置中
如，执行语句:
st=’abcdef’;insert(‘xy’,st,3);
后，st值为：’abxycdef’
21、过程Fillchar(x,y,a)：按字节填充。常用Fillchar(a,sizeof(a),0)对数组的所有元素进行清零。
22、过程Inc(i)使i:=i+1;
Inc(I,b)使I:=I+b;
23、过程dec(i)使i:=i-1;
dec(I,b)使I:=I-b;
24、EOF：判断当前打开的文件是否已到文件尾
25、EOLN：判断是否为行尾
（三）、位运算
1、SHR：x SHR n把x换成二进制后向右移n位
2、SHL：x SHL n把x换成二进制后向左移n位
3、and：位与。（1可视为真；0为假）。在其它领域可用符号∧、·表示。
4、or：位或。在其它领域可用符号∨、+表示
5、xor：位异或。在其它领域可用符号⊕表示trunc函数和int
6、not：按位取反。在其它领域可用符号⌝表示
例：Var i,j:byte;
begin
i:=10;{(10)10=(00001010)2}
j:=12;{(12)10=(00001100)2}
writeln(i shr2);{(00001010)2向右移两位，高位补零：(00000010)2，输出2}
writeln(i shl2);{(00001010)2向左移两位，低位补零：(00101000)2，输出40}
writeln(i and j);{(00001010)2∧(00001100)2=(00001000)2，输出8}
writeln(i or j);{(00001010)2∨(00001100)2=(00001110)2，输出14}
writeln(i xor j);{(00001010)2⊕(00001100)2=(0000110)2，输出6}
writeln(not i);{⌝(00001010)2=(11110101)2，输出245}
end.
（四）、几个语句及几个符号
1、break：退出循环
2、continue：直接回到循环体顶部执行
3、exit：退出当前子程序。若是主程序，结束运行。
4、halt：结束运行，回到操作系统
5、记录的定义及使用、开域语句with

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。