宁波计算机程序设计备考：PASCAL中所有单元常用过程及函数列表(5)

　　求平方根函数sqrt(x)和平方函数sqr(x)

　　定义：

　　平方根：function Sqrt(X: Real): Real;

　　注意：X 是实型表达式. 返回实型的X的平方根. 平方：function Sqr(X): (Same type as parameter);

　　注意：X 是实型或整型表达式.返回值的类型和X的类型一致，大小是X的平方，即X*X.

　　例子：

　　CODE:

　　begin

　　Writeln('5 squared is ', Sqr(5)); { 25 }

　　Writeln('The square root of 2 is ',Sqrt(2.0)); { 1.414 }

　　end;

　　数值转为字符串str

　　定义： procedure Str(X [: Width [: Decimals ]]; var S:string);

　　注意：将数值X转成字符串形式。

　　例子：

　　CODE:

　　var

　　S: string[11];

　　begin

　　Str(I, S);

　　IntToStr := S;

　　end;

　　begin

　　Writeln(IntToStr(-5322));

　　Readln;

　　end.

　　截尾函数trunc(x)

　　定义：function Trunc(X: Real): Longint; 注意：X是实型表达式. Trunc 返回Longint型的X的整数部分例子：

　　CODE:

　　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.

　　字符串转为数值val

　　定义： procedure Val(S; var V; var Code: Integer);

　　在这里:

　　S 是由一系列数字字符构成的字符串类型变量;。

　　V 是整型或实型变量;

　　Code 是Integer型变量

　　注意：Val将S转为它的数值形式。

　　例子：

　　CODE:

　　var s:string;I, Code: Integer;

　　begin

　　s:='1234';

　　val(s,i,code);

　　writeln(i); { 1234 }

　　end.

　　字符完全串连+

　　定义：操作符+把两个字符串联在一起。

　　例子：

　　CODE:

　　var s1,s2,s:string;

　　begin

　　s1:='Turbo ';

　　s2:='pascal';

　　s:=s1+s2; { 'Turbo pascal' }

　　end.

　　字符串压缩空格串连-

　　定义：操作符-去掉第一个字符串最后的空格后，将两个字符串联在一起。

　　例子：

　　CODE:

　　var s1,s2,s:string;

　　begin

　　s1:='Turbo ';

　　s2:='pascal';

　　s:=s1-s2; { 'Turbopascal' }

　　end.

编辑推荐：

历届宁波中小学计算机程序设计决赛真题汇总

备战宁波计算机程序设计比赛：快捷键一览表

宁波中小学计算机程序设计比赛常见编程语言关键字