PASCAL函数过程表

PASCAL函 数 过 程 表

1、数学函数 （1）求绝对值函数abs(x)，X可以是整型，也可以是实型；返回值和X的类型一致，例子：r := Abs(-2.3); { 2.3 } i := Abs(-157); { 157 } （2）取整函数int(x) ，注意：X是实型数，返回值也是实型的；返回的是X的整数部分，也就是说，X被截尾了，例子： R := Int(123.567); { 123.0 } R := Int(-123.456); { -123.0 }

（3）截尾函数trunc(x) ，注意：X是实型表达式. Trunc 返回Longint型的X的整数部分例子： Writeln(1.4, ' becomes ', Trunc(1.4)); { 1 } Writeln(-1.5, 'becomes ', Trunc(-1.5)); { -1 }

（4）四舍五入函数round(x) ，X是实型表达式. Round 返回Longint型的X的四舍五入值.如果返回值超出了Longint的表示范围，则出错。例子： Writeln(1.4, ' rounds to ', Round(1.4)); { 1 } Writeln(-1.5, 'rounds to ', Round(-1.5));{ -2 }

（5）取小数函数frac(x) ，注意：X 是实型表达式. 结果返回 X 的小数部分; 也就是说，例子： R := Frac(123.456); { 0.456 } R := Frac(-123.456); { -0.456 } （6）求平方根函数sqrt(x)，注意：X 是实型表达式，返回实型的X的平方根。例子：Writeln('The square root of 2 is ',Sqrt(2.0)); { 1.414 }

（7）平方函数sqr(x)，注意：X 是实型或整型表达式.返回值的类型和X的类型一致，大小是X的平方，例子：Writeln('5 squared is ', Sqr(5)); { 25 } 2、SYSTEM单元 （F表示函数，P表示过程 ） abs(x) f 求变量的绝对值 arctan(x) f 反正切

assign(f,c) p 将字符串c所表示的外部文件名赋给文件变量f break p 中止或结束循环

chr(x) f 求ascii码值为x的字符 close(f) p 关闭文件

concat(s1,s2...s3） f 字符串合并 continue p 继续循环

copy(s,pos,len) f 返回一个字符串的子串 cos(x) f 余弦函数 dec(x) f x:=x-1

delete(s,pos,len) p 删除一个字符串的子串 dispose(p) p 释放一个动态变量 eof(f) f 判断文件是否结束

eoln(f) f 判断文件类型中的一行是否结束 exit p 过程中止

exp(x) f 以e为底的指数函数

fillchar(d,len,date) p 填充数值或字符 frac(x) f 取实形变量的小数部分

halt p 立即中止程序执行，返回tp编辑器或dos

insert(s,d,pos) f 在一个字符串中某一位置开始插入一个子串 int f 取整数部分 inc（x）f:x:=x+1

length(s) f 取字符串的长度 new(p) p 建立一个新的动态变量

odd(x) f 判断一个变量的值是否为奇数 ord(ch) f 求一个字符的ascii码值

pi f 圆周率的值

pos(str1,str2) f 测一个字符串中包含的另一个子串的开始位置 pred(x) f 求前驱

random f 返回0~1之间的随机实数 randomize p 初始化随机数发生器 read/readln(f,x) p 读入/输入数据

reset(f) p 打开文件，并将文件指针指向开始，并准备读数据 rewrite(f) p 打开文件，并将文件指针指向开始，准备写资料 round(x) f 求实数的近似数 sin(x) f 正弦函数

sizeof(x) f 测变量大小 sqr(x) f 平方 sqrt(x) f 平方根

str(i,s) f 将一个整数转换成字符串 succ(X) f 后继函数

trunc(x) f 截去实数的小数部分

upcase(ch) f 将小写字母转换成大写字母 val(s,r,p) p 将一个字符串转换成数值 write/writeln(f,x) p 输出

3、关于fillchar的使用和讨论 执行fillchar(a,sizeof(a),0);

1.real(其他差不多) 使得a中的元素全部成为0.0 2.integer(byte,word,longint,shortint都相同) 全部为0 3.boolean 全部为false 4.char 全部为0 执行fillchar(a,size(a),1); 写几个特殊的

1.integer 全部为157 2.real 很大的一个数 3.boolean 全部为true

4.byte,shortint 全部为1，所以integer不行，可以用这两个，要不然就减去156 4、其他

1、字符完全串连+，操作符+把两个字符串联在一起。例子： s1:='Turbo’s2:='pascal'; s:=s1+s2; { 'Turbo pascal' }

2、字符串压缩空格串连-,去掉第一个字符串最后的空格后，将两个字符串联在一起例子： s1:='Turbo '; s2:='pascal';s:=s1-s2; { 'Turbopascal' }

注：PASCAL中无幂运算，这对数值方便的。这是pascal的一个缺点，但可exp(3*ln(2))。

三角函数的自变量的单位为弧度而不是度。如果想求，应先将，化成弧度：30*3.14159/180，然后求函数sin(30*3.14159/180)的值。Sin是指对边与斜边的比cos 是指邻边与斜边的比tan是指对边与邻边的比arctan是指邻边和对边的比

e的值大约是2.718281828… ln(x)gn exp(x)是反函数

计算问题来说是不大以用下面公式来求x

的n次方。用PASCAL函数来表示可写成：exp(n*ln(x))。如：求2的3次方 ，可写成