PASCAL函数过程表
目录:
1、数学函数;
2、所有单元;
3、SYSTEM单元(不需要uses语句);
4、DOS单元;
5、CRT单元;
6、其他单元;
trunc函数截取整数7、常用函数;
8、不常用函数;
9、退出方法。 
 
 
1、数学函数 
 求绝对值函数abs(x) 
定义:function Abs(X): (Same type as parameter); 
说明:X可以是整型,也可以是实型;返回值和X的类型一致例子: 
var 
r: Real; 
i: Integer; 
begin 
r := Abs(-2.3); { 2.3 } 
i := Abs(-157); { 157 } 
end. 
取整函数int(x) 
定义:function Int(X: Real): Real; 注意:X是实型数,返回值也是实型的;返回的是X的整数部分,也就是说,X被截尾了(而不是四舍五入)例子: 
var R: Real; 
begin 
R := Int(123.567); { 123.0 } 
R := Int(-123.456); { -123.0 } 
end. 

截尾函数trunc(x) 
定义:function Trunc(X: Real): Longint; 注意:X是实型表达式. Trunc 返回Longint型的X的整数部分例子: 
begin 
Writeln(1.4, ' becomes ', Trunc(1.4)); { 1 } 
Writeln(1.5, ' becomes ', Trunc(1.5)); { 1 } 
Writeln(-1.4, 'becomes ', Trunc(-1.4)); { -1 } 
Writeln(-1.5, 'becomes ', Trunc(-1.5)); { -1 } 
end. 
四舍五入函数round(x) 
定义:function Round(X: Real): Longint; 注意:X是实型表达式. Round 返回Longint型的X
的四舍五入值.如果返回值超出了Longint的表示范围,则出错. 例子: 
begin 
Writeln(1.4, ' rounds to ', Round(1.4)); { 1 } 
Writeln(1.5, ' rounds to ', Round(1.5)); { 2 } 
Writeln(-1.4, 'rounds to ', Round(-1.4));{ -1 } 
Writeln(-1.5, 'rounds to ', Round(-1.5));{ -2 } 
end. 

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