求Free Pascal函数与过程的教案（课件)

第三节、常量、变量、标准函数和表达式

一、 常量和变量
常量：程序运行过程中，其值不会改变的量，称为常量。在程序头部中说明，以CONST引导。
变量：程序运行过程中，其值可改变的量，称为变量。在程序头部中加以说明，以VAR引导。
如，在[例2、1]中说明的常量PI，变量S、R。

二、 标准函数
PASCAL语言提供数量非常大的标准函数供我们使用，这些函数有些可以直接调用，有些放在另外的单元（UNIT）中。PASCAL也提供了大量的标准过程，和标准函数一样供用户直接或间接调用。
如果一个函数或过程不在SYSTEM（即默认调用的单元）中，而在其它单元中话，即在程序头部的第一行正式行中加上USES 单元名；如，如果要使用CLRSCR（清屏过程，在CRT单元中）的话，就必须在程序头部加上：USES CRT；
函数的调用：如：A：=ABS（-34），即把-34的绝对值赋给变量A；（注意：函数只能出现在表达式中，即赋值语句中）。此时：A的数据类型与括号中的参数-34是一致的。函数的语法中都会说明，这个函数的参数的类型及这个函数的值（结果）的类型。
过程的调用：过程即命令，如：CLRACR； 程序运行结果是清屏。
常用标准函数与过程很多，这里只列出最常用的几个。
标准函数
函数名 语法 说明
Abs Abs（r:real/integer）:real/integer 返回参数R的绝对值，类型与参数相同
Chr chr（i：integer）：char 返回参数所对应的ASCII码值，类型为CHAR
Copy Copy(s:string;n,m:integer):string 返回字串S的第N个字符开始的M个字符
Cos Cos(r:real):real 返回参数R的余弦值
Exp Exp(r:real):real 返回参数R的以e为底的幂
Int Int(r:real):real 返回参数R的整数部分，返回的值是实数类型
Length Length(s:string):integer 返回字串S的长度
Ln Ln(r:real):real 返回参数R的自然对数
odd Odd(I:integer):boolean 判断参数I是否奇数，如是，则返回TRUE
ord Ord(s:scalar):integer 返回任意有序量的序值
random Random 返回0至于间的任意一个小数（随机数）
round Round(r:real):longint 返回参数R的四舍五入取整值
sin Sin(r:real):real 返回参数R的正弦值
sqrt sqrt(r:real):real 返回参数R的平方根
sqr Sqr(r) 返回参数R的平方值，结果类型与R的类型相同
trunc Trunc(r:real):integer 返回参数R的整数部分，返回的值是整数类型
标准过程
过程名 语法 说明
Delay(CRT单元) Delay(ms:word) 延迟发声MS毫秒
Delete Delete(s:string;n,m:integer) 把串S中的第N个字符开始的M个字符删除
Exit Exit 从当前执行的程序中退出
Gotoxy(CRT单元) Gotoxy(x,y:integer) 把光标定位到第X列Y行处
halt Halt 中断程序的运行
nosound Nosound 关闭机器喇叭
Sound(CRT单元) Sound(f:word) 让机器喇叭发出频率为F的声音，直到nosound
str Str(I:integer;var s:string) 把数值I转换为字符串S
val Val(s:string;var r:real;var c:word) 把字符串S转换为数值R，并返回错误代码C

三、 表达式
由算术运算符（+，—，*，/）及数字、常量、变量、标准函数所组成的式子中心表达式。
如：5+9； A*B-34*ABS（-34）/INT（B）
另外，PASCAL中有两个很有用的运算符，DIV：求商的整数值；MOD：求余数。如：
8 DIV 3 的值是2，10 DIV 3 的值是3；
8 MOD 3的值是2，10 MOD 3的值是1；
在PASCAL的表达式中，不允许出现我们日常生活中的那种分式或根号等式子，我们必须按照PASCAL的语法把它们改写成PASCAL表达式。在PASCAL的表达式中，运算顺序是：
（）à 函数 à *，/，DIV，MOD à +,-
如：把下列算式改写成PASCAL表达式：
改写为PASCAL表达式为：(x*x+3*y-5*(z-2))/(x-y*y)
从上例中可以看出：
1、 PASCAL表达式中没有分式，只能以除号“/”来隔开；
2、 PASCAL表达式中的分子与分母应该用括号括开；
3、 PASCAL表达式中只有小括号，不能有中括号或大括号，小括号可以有很多层；
4、 PASCAL表达式中没有乘幂，只能用乘法来表达（在FP中有平方函数，所以可以使用SQR函数）；
5、 PASCAL*表达式中任意两个常量、变量、数值、括号、函数之间都必须不能缺省运算符，即乘号必不可少；
这些要求希望大家记熟，这是我们编写PASCAL程序的必要基础。

有，不知你是否有邮箱，有邮箱的话我及时发来