pascal函数库的函数——要多的

作者&投稿:威凭 (若有异议请与网页底部的电邮联系)
pascal全部函数~

Abs
语法 Function Abs (r:Real):Real;
Function Abs (r:Integer):Integer;
Abs返回参数的绝对值。函数结果说明与参数类型(Real或Integer)相同。
Addr
语法 Function Addr(Var Variable);Pointer;
说明 Addr返回一变量,类型变量或过程的地址。
结果为指针类型
Append
语法 Procedure Append(Var F:Text);
说明 Append 打开一文本文件以便添加,并将指针定在文件尾
ArcTan
语法 Funtion ArcTan(R:Real):Real;
说明 ArcTan返回参数的正切值。
Assign
语法 Procedure Assign(Var F:File);
说明 Assign将文件名Name赋给文件变量F。
BlockRead
语法 Procedure BlockRead(Var F:File;
Var B :Type;
NumRecs :Integer;
Var RecsRead :Integer);
说明 BlockRead从无类型文件F中读出NumRecs个记录,放在缓冲区B。BlockRead表示了实际读出的记录数。注意,只有PC/MS—DOC版本支持BlockRead
BlockWrite
语法 Procedure BlockWrite (Var F:File;
Var B :Type;
NumRecs :Integer);
说明 BlockWrite从缓冲区B中读出NumRecs个记录写至无类型文件F中。
ChDir
语法 Procedure ChDir(S:string);
说明 ChDir将当前目录换为S所表示的目录。
Chr
语法 Function Chr(I: Integer);
说明 Chr返回出I序数值所对应的ASCII字符。
Close
语法 Procedure Close(Var F:File)
说明 Close为文件F清除缓冲区,并关闭该文件。

Concat
语法 Function Concat(S1,S2,…Sn):String;
说明 Concat将任意多个字符串联在一起,返回所有字符串的联接,如果联接后的字符长度大于255,Turbo Pascal出现运行错误。
Copy
语法 Function Copy(S:string;
P,L:integer):String;
说明 Copy 返回字符串中第P个字符开始的L个字符。
Cos
语法 Function Cos(R:Real):Real;
说明 Cos返回R的余弦值。
Cseg
语法 Function Cseg:word;
说明 Cseg返回程序代码段的段地址。
Dec
语法 Procedure Dec(Var x:Scalar;
n:LongInt);
说明 Dec是变量x减去n。若省略n,则x减去1。
Delete
语法 Procedure Delete(S:String;
P,L:Integer);
说明 Delete 删除字符串S中从第P个字符开始的L个字符。
Dispose
语法 Procedure Dispose(P:Pointer);
说明 释放由指针变量设定的堆存贮区域,Dispose与命令New联合使用。
Dseg
语法 Function Dseg:Word;
说明 Dseg返回程序中数据段的地址。
Eof
语法 Function Eof(F:File):Boolean;
说明 当F文件指针到达文件尾时,Eof返回TRUE。
Eoln
语法 Function Eoln(F:File):Boollean;
说明 当F文件指针到达一行的尾(由回车符和换行符表示)或文件尾时,Eoln返回TURE.
Erase
语法 Procedure Erase(F:File);
说明 Erase删除磁盘文件,并从目录中删该目录项。
Exit
语法 Procedure Exit;
说明 Exit使程序从当前执行的块中退出。

Exp
语法 Function Exp(R:Real):Real;
说明 Exp返回R的以e为底的幂。
FilePos
语法 Function FilePos(F:File);Integer;
说明 FilePos返回文件F指针所指向的记录号。
FileSize
语法 Function FileSize(F:File);Integer;
说明 FileSize返回F当前所含记录数。
FileChar
语法 Procedure Fillchar(Variable:Type;
I,code:Scalar);
说明 FileChar在以Variable为起始地址处用code写I个字节。code可以是任意标量类型。
Flush
语法 Procedure Flush(var F:Text);
说明 Flush刷新用于输出文件F的全部磁盘缓冲区。
Frac
语法 Function Frac(R:Real):Real;
说明 Frac返回实数R的小数部分。
FreeMem
语法 Procedure FreeMem(Var P:Pointer;
I:Integer);
说明 FreeMem释放与变量P相关的I个字节长度,并将释放的内存归还给堆,但该内存必须是已由Getmem设置过的。
GetMem
语法 Procedure GetMem(Var P:Pointer;I:Integer);
说明 GetMem保留堆中I个字节,并贮存起始地址在变量P中。
Halt
语法 Procedure Halt;
说明 Halt中断程序的执行。
Hi
语法 Function Hi(I:Integer):Byte;
说明 Hi返回整数I的高位字节。
Inc
语法 Procedure Inc(Var x; n:LongInt);
说明 Inc为变量x加上n的值(x+n)。若参数表中缺省n,则x加1(x+1)。
Insert
语法 Procedure Insert(Source:string)
Var Target:string;
Index:Integer);
说明 Insert将字符串Source插入到字串Target的Index处。
Int
语法 Function Int(R:Real):Integer;
说明 Int返回实数R的整数部分。
IOresult
语法 Function Ioresult:word;
说明 IOresult报告执行当前输入输出操作的错误代码。当Ioresult的值不为0时则表示有错误发生。
Length
语法 Function Length(S:String):Integer;
说明 Length返回字符串S的长度。
Ln
语法 Function Ln(Var R:Real):Real;
说明 Ln返回实数R的自然对数。
Lo
语法 Lo(I:Integer):Byte;
说明 Lo返回整数I的低位字节。
Mark
语法 Procedure Mark(P:Pointer);
说明 Mark 贮存了当前堆顶端地址于指针P中。
MaxAvail
语法 Function MaxAvail:LongInt;
说明 返回堆中自由空间的总长度。
MKDir
语法 Procedure MKDir(S:String);
说明 MKDir以字符串S命令建立一目录。
Move
语法 Procedure Move(var v1,v2;
I:Integer);
说明 Move可将变量V1中I个字节复制到变量V2中。
New
语法 Procedure New(Var P:Pointer);
说明 New为指针P设置内存。设置后,该变量可做为P引用。
Odd
语法 Function Odd(I:Integer):Boolean;
说明 当I为奇数时Odd返回TRUE,当I为偶数时返回为FALSE。
Ofs
语法 Function Ofs():Integer;
说明 Ofs返回任一变量,过程或函数的内存地址偏移量。
Ord
语法 Function Ord(S:Scalar):Integer;
说明 Ord返回任一有序变量的序值。
ParamCount
语法 Function ParamCount:word;
说明 ParamCount返回命令行的参数个数。
ParamStr
语法 Function ParamStr(I:word):String;
说明 ParamStr返回命令行所指定的参数。例如:ParamStr(1)返回第一个参数。在DOS3.0以上版本中,ParamStr(0)返回执行文件的路径和文件名。
Pi
语法 Function Pi:Real;
说明 Pi返回数字常量。设数据的精度依赖于是否用了8087。
Pos
语法 Function Pos(Subs,S:String):Integer;
说明 Pos返回字串SubS在字符串S中的位置。若S中未找到Subs,Pos返回值为0。
Pred
语法 Function Pred(var s:Scalar):Integer;
说明 Pred返回任一有序变量的前继。
Ptr
语法 Function Ptr(segment,Offset:Integer):Pointer;
说明 Ptr接受包含有段值和偏移量的一个整数,并将其变为—32位指针变量返回。
Random
语法 Function Random(I:word):word;
Function Random:Real;
说明 Random返回Turbo Pascal产生的一个随机数。若指定一个整数参数的话,Random返回一个大于或等于0,且小于该参数的整数,若不指定整数,Random返回一个大于或等于0,且小于1的实数。
Randomize
语法 Function Randomize;
说明 Randomize初始化随机数产生程序。其基数存放在长整型变量Randseed中。
Read(Readln)
语法 Procedure Read({Var F:File,} Parameters);
Procedure Readln({Var F:File,} Parameters);
说明 Read从标准输入设备或F定义的文件中读出数据。Readln只适用于文本文件,其读入形式与Read相同,但读完一次数据后,Readln将文件指针移至下一个回车符/换行符处。
Release
语法 Procedure Release(Var P:Pointer);
说明 Release释放由Mark命令所设置的内存。用Mark于贮存指针P的堆地址。
Rename
语法 Procedure Rename(Var F:File;
S:String);
说明 Rename将文件F的文件名变为字符串S。

Reset
语法 Procedure Reset(Var F:File{;I:Integer});
说明 Reset打开文件F以便读文件。如果F是无类型文件,可用I值指定记录的大小。
Rewrite
语法 Procedure Rewrite(Var F:File{;I:Integer});
说明 Rewrite打开一个文件准备写。若文件不存在,Turbo Pascal创建一个文件。若文件已经存在,则清除文件内容。若是无类型文件,可用整数I说明记录大小。
RmDir
语法 Procedure RmDir(S:String);
说明 RmDir删除目录S。
Round
语法 Function Round(R:Real):LongInt;
说明 Round将实数R四舍五入取整并返回。
RunError
语法 Procedure RunError;
Procedure RunError;(ErrorCode:word);
说明 RunError停止程序执行并产生运行错误。如果包含了ErrorCode,Turbo Pascal将按所出现的运行错误类型中断程序。
Seek
语法 Procedure Seek(Var F:File;P:Integer);
说明 Seek将文件指针移至文件F的第P个记录的起点。
SeekEof
语法 Function SeekEof(Var F:File):Boolean;
说明 SeekEof,
SeekEoln
语法 Function SeekEoln(Var F:File):Boolean;
说明 SeekEoln与Eoln相似,只是在测试文件结束符前前者要跳过空格、制表符和文件结束。结果类型为布尔型。
Seg
语法 Seg(Var Variable):word;
Function Seg():word;
说明 Seg返回变量、过程或函数的段地址。
SetTextBuf
语法 SetTextBuf(Var f: Text; Var Buf);
Procedure SetTextBuf(Var f: Text; Var Buf;size:word);
说明 SetTextBuf将文本文件赋以缓冲区buf。若未指定缓冲区大小的话,缓冲区尺寸就是Buf。Size可用做缓冲区尺寸缺省值。
Sin
语法 sin(R:Real):Real;
说明 Sin返回R的正弦值。

Sizeof
语法 Function Sizeof(var Variable):word;
说明 Sizeof返回一个变量或一个数据类型所需的字节数。
SPtr
语法 Function SPtr:word
说明 SPtr返回堆栈指针寄存器(sp)的当前值。
Sqr
语法 Function Sqr(R:Real):Real;
说明 Sqr返回R的平方值。
Sqrt
语法 Function Sqrt(R:Real):Real;
说明 Sqrt返回R的平方根
Sseg
语法 Function Sseg:word
说明 Sseg返回堆栈段寄存器当前值。
Str
语法 Str(I:Integer;[:Length,]Var S:String);
Procedure Str(R: Real;[:length:Decimals,])Var S: String);
说明 Str将一个实数或一个整数转换为一个字符串。
Succ
语法 Function Succ(S:scalar):Integer;
说明 Succ将任一标量值后移一个。
Swap
语法 Function Swap(I:Integer):Integer;
说明 Swap将一个整数的高位字节和低位字节交换,例如:如果I等于00FFh,Swap返回FF00h。
Trunc
语法 Function Trunc(R: Real):Integer;
说明 Trunc返回R的整数部分,结果必须在合法的整数范围内。
Truncate
语法 Procedure Truncate(Var f);
说明 Truncate在当前文件指针处强行结束文件,文件指针后的内容丢失。
Upcase
语法 Function Upcase(C:char):char
说明 如果C为小写字母Upcase返回C的大写值。
Val
语法 Procedure Val (S:String;Var R:Real;Var Code:Integer);
Procedure Val (S:String;Var I:Integer Var Code:Integer);
说明 Val将S转换为一个数字值(R或I)。如果转换为成功Turbo Pascal置Code为0,如果失败Code包含一个整数,它表示字符串中发生错误的字符。


Write(Writeln)
语法 Procedure write({Var F:File,}Parmeters);
Procedure writeln({Var F:File,}Parmeters);
说明 Write接收一个参数表,并将它写入缺省输出设备,当第一个参数为文件变量时,输出指向该文件,Writeln仅用于文本文件,操作与write相同,但在输出结束时加上回车和换行。

1.算术函数
函数标识符 自变量类型 意义 结果类型
abs 整型、实型 绝对值 同自变量
arctan 整型、实型 反正切 实型
cos 整型、实型 余弦 实型
exp 整型、实型 指数 实型
frac 整型、实型 小数部分 实型
int 整型、实型 整数部分 实型
ln 整型、实型 自然对数 实型
pi 无自变量 圆周率 实型
sin 整型、实型 正弦 实型
sqr 整型、实型 平方 同自变量
sqrt 整型、实型 平方根 实型
例:abs(-4)=4 abs(-7.49)=7.49 arctan(0)=0.0
sin(pi)=0.0 cos(pi)=-1.0 frac(-3.71)=-0.71
int(-3.71)=-3.0 sqr(4)=16 sqrt(4)=2

2.标准函数
函数标识符 自变量类型 意义 结果类型
odd 整型 判断奇数 布尔型
pred 离散类型 求前趋 同自变量
succ 离散类型 求后继 同自变量
例:odd(1000)=false pred(2000)=1999 succ(2000)=2001
odd(3)=true pred('x')='w succ('x')='y'

3.转换函数
函数标识符 自变量类型 意义 结果类型
chr byte 自变量对应的字符 字符型
ord 离散类型 自变量对应的序号 longint
round 实型 四舍五入 longint
trunc 实型 截断取整 longint
例:chr(66)='B' ord('A')=65 round(-4.3)=-5 trunc(2.88)=2

4.杂类函数
函数标识符 自变量类型 意义 结果类型
random 无自变量 [0,1间的随机实数 real
random word [0,自变量间的随机整数) word
randomize 无自变量 初始化内部随机数产生器 longint
upcase 字符型 使小写英文字母变为大写 字符型
downcase 字符型 使小写英文字母变为大写 字符型

SYSTEM TP的运行库,包括常用的标准函数和过程,可以在程序中直接使用,不需USES语句说明。
DOS 具有日期、时间、目录查找、程序执行等功能
CRT 具有屏幕模式控制、扩展键盘码、颜色、窗口、声音等 功能
PRINTER 支持打印输出操作。
GRAPH 高级图形软件包,支持多种图形适配器。
GRAPH3 实现TP3.0的图形软件包。
TURBO3 兼容TP3.0的源程序。
OVERLAY 实现高级覆盖管理

SYSTEM单元常用过程与函数
ABS(X) F 求变量的绝对值
ADDR(X) F 测变量地址
APPEND(F) P 打开一个存在的文本文件,并将文件指 针指向文件末尾准备添加元素
ARCTAN(X) F 反正切
ASSIGN(F,C) P 将字符串C所表示的外部文件名赋给文 件变量F
ASSIGNED(X) P 测试程序当中的指针或变量是否为空
BLOCKREAD(F,D,NUM) P 读类型文件。
BLOCKWRITE(F,D,NUM) P 写无类型文件
BREAK P 中止或结束循环
CHDIR(PATH) P 改变当前目录
CHR(X) F 求ASCII码值为X的字符
CLOSE(F) P 关闭文件
CONCAT(S1,S2...S3) F 字符串合并
CONTINUE P 继续循环
COPY(S,POS,LEN) F 返回一个字符串的子串
COS(X) F 余弦函数
CSEG F 返回CS寄存器的当前值
DEC(X) F X:=X-1
DELETE(S,POS,LEN) P 删除一个字符串的子串
DISPOSE(P) P 释放一个动态变量
DSEG F 返回DS寄存器的当前值
EOF(F) F 判断文件是否结束
EOLN(F) F 判断文件类型中的一行是否结束
ERASE(F) P 删除一个存在的外部文件。
EXIT P 过程中止
EXP(X) F 以E为底的指数函数
FILEPOS(F) F 文件记录的当前位置
FILESIZE(F) F 文件记录数
FILLCHAR(D,LEN,DATE) P 填充数值或字符
FLUSH(F) P 清空文件缓存区
FRAC(X) F 取实形变量的小数部分
FREEMEM(P,I) P 释放变长动态变量
GETDIR(DRV,PATH) P 取当前盘,当前目录
GETMEM(P,I) P 分配变长的动态变量,并把块地址存放在一个指针变量中
HALT P 立即中止程序执行,返回TP编辑器或DOS
HI(I) F 返回一个变量的高位字节
INSERT(S,D,POS) F 在一个字符串中某一位置开始插入一个子串
INT F 取整数部分
IORESULT F 返回最后一次输入/出操作的结果状态
LENGTH(S) F 取字符串的长度
LN(R) F 求自然对数
LO(I) F 返回一个变量的低位字节
MAXAVAIL F 返回最大内存空间
MEMAVAIL F 返回可用内存数目
MKDIR(PATH) P 建立一个子目录
MOVE(S,D,LEN) P 快传送
NEW(P) P 建立一个新的动态变量
ODD(X) F 判断一个变量的值是否为奇数
OFS(X) F 侧变量偏移地址
ORD(CH) F 求一个字符的ASCII码值
PARAMCOUNT F DOS参数串长度
PARAMSTR(N) F DOS参数串
PI F 圆周率的值
pos(str1,str2) f 测一个字符串中包含的另一个子串的开始位置
pred(x) f 求前驱
ptr(i) f 指针赋值
random f 返回0~1之间的随机实数
randomize p 初始化随机数发生器
read/readln(f,x) p 读入/输入数据
rename(f,str) p 给一个外部文件改名
reset(f) p 打开文件,并将文件指针指向开始,并准备读数据
rewrite(f) p 打开文件,并将文件指针指向开始,准备写资料
rmdir(path) p 删除一个子目录
round(x) f 求实数的近似数
runerror p 停止程序的运行
scrollto p 滚动显示窗口的某部分内容
seek(f,n) p 将文件指针定位于文件f的第n个文件成分上
seekrof(f) f 定位到文件尾
seekroln(f) f 定位到行尾
seg(n) f 测变量段地址
settextbuf(f) p 将输入/出缓冲区与一个文本文件建立关联
sin(x) f 正弦函数
sizeof(x) f 测变量大小
sptr f 返回sp寄存器的当前值
sqr(x) f 平方
sqrt(x) f 平方根
sseg f 返回ss寄存器的当前值
str(i,s) f 将一个整数转换成字符串
succ(X) f 后继函数
swap(x) f 交换一个变量的高位和低位字节
trunc(x) f 截去实数的小数部分
truncate(f) p 截去文件当前指针以后的内容
upcase(ch) f 将小写字母转换成大写字母
val(s,r,p) p 将一个字符串转换成数值
writeln(f,x) p 输出
dos单元常用过程与函数
getdate p 返回系统当前日期
detftime p 返回最后一次写入的日期和时间
gettime p 返回系统当前时间
packtime p 转换系统日期和时间,封装成4个字节的长整形格式
setdate p 设置系统当前日期
setftime p 写入新的系统日期和时间,覆盖系统最后一次写入的 系统日期和时间文件
settime p 设置系统当前时间
uppacktime p 将系统日期和时间转换成纪录格式
diskfree f 返回指定磁盘可用剩余空间
disksize f 返回指定磁盘的总容量
get/setverity p 返回/设置dos状态下的磁盘读写标记
fexpand f 返回函数名的全称
fsearch f 在一个目录中查找文件
fsplit f 将一个文件名分成目录、文件名、扩展名
findfirst p 在当前目录或指定目录下查找第一个与给定属性相匹 配的文件名



作者: 巫山霏云 2005-2-7 16:49 回复此发言

--------------------------------------------------------------------------------

3 turbo pascal基本函数过程及解释
findnext p 返回下一个满足匹配条件的文件名
getfattr p 返回文件的属性
setfattr p 设置文件属性
gerintvec p 返回某个中断变量值
intr p 执行软中断
msdos p 执行dos 系统调用
setintvec p 设定中断值
exec p 通过一个特定命令行执行特定程序段
keep p 中断程序的执行但仍驻留在内存中
swapvectors p 用当前变量交换所有中断变量值
dosexitcode f 回到子程序出口
dosversion f 显示dos版本
crt单元
assigncrt(f) p 将文本文件f与显示器crt建立联系
clreol p 清除当前行光标所在位置以后的字符
clrscr p 清除当前窗口或屏幕,光标返回到左上角
delay(t) p 等待t毫秒
delline p 清除光标所在行上所有内容
gotoxy(x,y) p 将光标移到屏幕某处
highvideo p 选择高亮度显示字符
insline p 在当前光标位置插入空行
keypressed f 测定键盘输入状态
lowvideo p 低亮度显示字符
normvideo p 选择正常文本属性从光标所在位置开始显示字符
nosound p 关闭内部扬声器
readkey p 等待从键盘输入一个字符
sound(hz) p 以hz指定的频率发声
textbackground(soor) p 设置正文背景颜色
textcolor(color) p 设置正文前景颜色
textmode p 选择特定的文本显示模式
wherex/y f 返回当前光标位置的坐标值
window(x1,y1,x2,y2) p 在屏幕定义一个文本窗口


其他单元
chain(f) p 目标程序链接
execute(f) p 执行目标程序
mark(p) p 标记动态变量
release(p) p 释放动态变量区
srtinit p 屏幕初始化
crtline p 汉字屏幕方式转换
graphbackground(color) p 选择背景色
graphcolormode p 中分辨率彩色图形方式,320*200彩色
graphmode p 中分辨率黑白图形方式,320*200黑白
graphwindow(x1,y1,x2,y2,color)p 定义图形方式窗口
hires p 高分辨率单色图形方式,640*200黑白
hirescolor(color) p 高分辨率彩色图形方式,640*200彩色
palette(color) p 中分辨率彩色图形颜色组
ovrpath(path) p 指定覆盖文件路径
draw(x1,y1,x2,y2,color) p 画线
intr(n,m) p 8086中断调用
plot(x,y,color) p 画点
random(integer) f 产生随机整数
seg(x) f 测变量段地址
colortable(c1,c2,c3,c4) p 重定义颜色组
arc(x,y,radius,color) p 画圆弧
circle(x,y,radius,color) p 画圆
getpic(buffer,x1,x2,y1,y2) p 屏幕转储到屏幕
putpic(buffer,x,y) p 缓冲器转储到屏幕
getdotcolor(x,y) p 读点
fillscreen(color) p 填充屏幕
fillshape(x,y,fillcol,bordercol) p 填充一个区域


常用数学函数
求绝对值函数abs(x)
定义:function Abs(X): (Same type as parameter);
说明:X可以是整型,也可以是实型;返回值和X的类型一致例子:

取整函数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.

取小数函数frac(x)
定义:function Frac(X: Real): Real;

注意:X 是实型表达式. 结果返回 X 的小数部分; 也就是说,Frac(X) = X - Int(_X). 例子:
var
R: Real;
begin
R := Frac(123.456); { 0.456 }
R := Frac(-123.456); { -0.456 }
end.

求平方根函数sqrt(x)和平方函数sqr(x)
定义:平方根:function Sqrt(X: Real): Real;
注意:X 是实型表达式. 返回实型的X的平方根. 平方:function Sqr(X): (Same type as parameter);
注意:X 是实型或整型表达式.返回值的类型和X的类型一致,大小是X的平方,即X*X.
例子:
begin
Writeln('5 squared is ', Sqr(5)); { 25 }
Writeln('The square root of 2 is ',Sqrt(2.0)); { 1.414 }

一、数学函数:
Inc(i) 使i:=i+1;
Inc(I,b) 使I:=I+b;
dec(i) 使i:=i-1;
dec(I,b) 使I:=I-b;
Abs(x) 求x的绝对值 例:abs(-3)=3
Chr(x) 求编号x对应的字符。例:Chr(65)=’A’ chr(97)=’a’ chr(48)=’0’
Ord(x) 求字符x对应的编号。例:ord(‘A’)=65 ord(‘a’)=97 另外:ord(false)=0 ord(true)=1
Sqr(x) 求x的平方。 例:sqr(4)=16
Sqrt(x)求x的正根. 例:sqrt(16)=4 (PS:负数是不能进行运算的,如果需要就要先取绝对值:sqrt(-4)是错的,应该为sqrt(abs(-4))
round(x) 求x的四舍五入 例:round(4.5)=5
trunc(x) 求x的整数部分 例:trunc(5.6)=5 结果是integer型
int(x) 求x的整数部分 例int(5.6)=5.0 结果是real型
frac (x)求x的小数部分 例 frac(5.6)=0.6
pred(x) 求x的前导 pred(‘b’)=’a’ pred(5)=4 pred(true)=false
succ(x) 求x的后继 succ(‘b’)=’c’ succ(5)=6 succ(false)=true
odd(x) 判断x是否为奇数。如果是值为true,反之值为false. Odd(2)=false odd(5)=true
power(a,n) 求a的n次方 power(2,3)=8 {只有在开启math库时才可以使用}
random 取0~1之间的随机数(不能取到1)
randomize 随机数的种子函数,在每次设置随机数时都要把这个函数放在最前面.
Fillchar(a,size(a),0) 数组初始化,即把数组a的值全部置为0 {赋成布尔型变量也可以}
SHR: x SHR n 把x换成二进制后向右移n位,相当于 把x 除以 2n
SHL: x SHL n把x换成二进制后向左移n位,相当于 把x 乘以 2n
[编辑本段]二、字符串函数
1. 连接运算 concat(s1,s2,s3…sn) 相当于s1+s2+s3+…+sn.
例:concat(‘11’,’aa’)=’11aa’;
2. 求子串。 Copy(s,I,L) 从字符串s中截取第I个字符开始后的长度为L的子串。
例:copy(‘abdag’,2,3)=’bda’
3. 删除子串。过程 Delete(s,I,l) 从字符串s中删除第I个字符开始后的长度为l的子串。
例:s:=’abcde’;delete(s,2,3);结果s:=’ae’
4. 插入子串。 过程Insert(s1,s2,I) 把s1插入到s2的第I个位置
例:s:=abc;insert(‘12’,s,2);结果s:=’a12bc’
5. 求字符串长度 length(s) 例:length(‘12abc’)=5
6. 搜索子串的位置 pos(s1,s2) 如果s1是s2的子串 ,则返回s1的第一个字符在s2中的位置,若不是子串,则返回0.
例:pos(‘ab’,’12abcd’)=3
7. 字符的大写转换。Upcase(ch) 求字符ch的大写体。
例:upcase(‘a’)=’A’
8. 数值转换为数串。 过程 Str(x,s) 把数值x化为数串s.
例:str(12345,s); 结果s=’12345’
9. 数串转换为数值。 过程val(s,x,I) 把数串s转化为数值x,如果成功则I=0,不成功则I为无效字符的序数
例:val(‘1234’,x,I);结果 x:=1234
[编辑本段]三、标准函数
标准函数。Turbo Pascal语言提供了自变量为整型量的标准函数有顺序函数算术函数和转换函数等。
标准函数是Turbo Pascal语言预先定义的,它们实际上是能完成特定功能的称步子程序的程序段。每个标准函数都用一个标识符来标识,每个标准函数都能完成一个特定的功能,在程序中可以直接调用它们。Turbo Pascal语言中某些标准函数与数学中的函数有相似之处。
一、整数类型函数
整型是顺序类型,即所有的整型数都是按一定的顺序排列的。如3的后序数是4,350的后序数是351。以后介绍的布尔型、字符型、枚举类型和子界类型等都是顺序类型。顺序函数可以对顺序类型数据进行操作,但要注意它们自变量的取值范围。
①前趋函数:Pred(x)函数值为x-l,例如:
Pred (6)=5 Pred (-21)=-22
②后继函数:Succ (x)函数值为x+l,例如:
Succ (l5)=16 Succ (-114)= -113
③绝对值函数:Abs (x)函数值为|X|,例如:
Abs (-119)=119 Abs (101)=101
④平方函数:Sqr (x)函数值为X2,例如:
Sqr (-5)=,25 Sqr (l0)= 100
以上四个函数的结果仍是整型数。
⑤奇函数:Odd (x),函数的结果为布尔型。当X为奇数时,函数值为true;当X为偶数时,函数值为false。例如:
Odd (13)= True Odd (16)= False
⑥字符函数:Chr (X),函数值是序号的ASCII字符,属字符型。例如:
Chr (65)=’A’ Chr (32)=’ ’
二、实数类型函数
在下列算术函数中,X可以是实型或整型数的表达式。对于函数Abs和Sqr,其结果类型和变量X的类型相同,其他算术函数的结果类型都是实型。
绝对值函数Abs(x):函数值为x的绝对值
平方函数Sqr (x):函数值为x的平方
小数函数Frac (x):函数值为x的小数部分
整数函数Int (x):函数值为x的整数部分
正弦函数Sin (x):函数值为x的正弦,其申,的单位为弧度
余弦函数Cos (x):函数值为x的余弦,其中,的单位为弧度
指数函数Exp (x):函数值为了ex
对数函数Ln (X):函数值为x的自然对数
平方正根根函数的Sqrt (x):函数值为x的平方正根
反正切函数Arctan(x):函数值为x的反正切,单位为弧度
随机函数Random:无自变量时,函数值取(0,1)间的随机小数;有自变量且为Word类型时,函数值取(0,自变量)间的随机整数。
三、字符类型函数Turbo Pascal语言提供如下自变量为字符型的标准函数,其中Chr为字符型。
后继函数Succ (ch):例如,Succ (’8’)=’9’ Succ (’E’)=’F’
对字符集的最后一个字符,Succ函数无意义。
前趋函数Pred (ch):例如,Pred (’7’)=’6’ Pred (’B’)=’ A’
序数函数Ord (ch)::给出字符ch在ASCII字符集中的序号,结果为整型。
注意:Ord (’7’)<>7,正确的是:Ord (’7’)=Ord(’0’)+7=48+7=55
若ch是数字字符,则Ord (ch)-Ord ('0')是该数字字符的数值。例如:Ord (’7’)-Ord(’0’)=7
前面介绍的字符函数Chr (i)是Ord (ch)的逆函数。例如:
Chr (55)= ’7’ Chr (Ord(’A’))=’A’
三、布尔类型函数
Turbo Pascal语言提供布尔型函数主要是几个字符型函数。
Ord (B) 例如:Ord (false)=0 Ord (true)=1

1.算术函数
函数标识符 自变量类型 意义 结果类型
abs 整型、实型 绝对值 同自变量
arctan 整型、实型 反正切 实型
cos 整型、实型 余弦 实型
exp 整型、实型 指数 实型
frac 整型、实型 小数部分 实型
int 整型、实型 整数部分 实型
ln 整型、实型 自然对数 实型
pi 无自变量 圆周率 实型
sin 整型、实型 正弦 实型
sqr 整型、实型 平方 同自变量
sqrt 整型、实型 平方根 实型
例:abs(-4)=4 abs(-7.49)=7.49 arctan(0)=0.0
sin(pi)=0.0 cos(pi)=-1.0 frac(-3.71)=-0.71
int(-3.71)=-3.0 sqr(4)=16 sqrt(4)=2

2.标准函数
函数标识符 自变量类型 意义 结果类型
odd 整型 判断奇数 布尔型
pred 离散类型 求前趋 同自变量
succ 离散类型 求后继 同自变量
例:odd(1000)=false pred(2000)=1999 succ(2000)=2001
odd(3)=true pred('x')='w succ('x')='y'

3.转换函数
函数标识符 自变量类型 意义 结果类型
chr byte 自变量对应的字符 字符型
ord 离散类型 自变量对应的序号 longint
round 实型 四舍五入 longint
trunc 实型 截断取整 longint
例:chr(66)='B' ord('A')=65 round(-4.3)=-5 trunc(2.88)=2

4.杂类函数
函数标识符 自变量类型 意义 结果类型
random 无自变量 [0,1间的随机实数 real
random word [0,自变量间的随机整数) word
randomize 无自变量 初始化内部随机数产生器 longint
upcase 字符型 使小写英文字母变为大写 字符型
downcase 字符型 使小写英文字母变为大写 字符型

SYSTEM TP的运行库,包括常用的标准函数和过程,可以在程序中直接使用,不需USES语句说明。
DOS 具有日期、时间、目录查找、程序执行等功能
CRT 具有屏幕模式控制、扩展键盘码、颜色、窗口、声音等 功能
PRINTER 支持打印输出操作。
GRAPH 高级图形软件包,支持多种图形适配器。
GRAPH3 实现TP3.0的图形软件包。
TURBO3 兼容TP3.0的源程序。
OVERLAY 实现高级覆盖管理

SYSTEM单元常用过程与函数
ABS(X) F 求变量的绝对值
ADDR(X) F 测变量地址
APPEND(F) P 打开一个存在的文本文件,并将文件指 针指向文件末尾准备添加元素
ARCTAN(X) F 反正切
ASSIGN(F,C) P 将字符串C所表示的外部文件名赋给文 件变量F
ASSIGNED(X) P 测试程序当中的指针或变量是否为空
BLOCKREAD(F,D,NUM) P 读类型文件。
BLOCKWRITE(F,D,NUM) P 写无类型文件
BREAK P 中止或结束循环
CHDIR(PATH) P 改变当前目录
CHR(X) F 求ASCII码值为X的字符
CLOSE(F) P 关闭文件
CONCAT(S1,S2...S3) F 字符串合并
CONTINUE P 继续循环
COPY(S,POS,LEN) F 返回一个字符串的子串
COS(X) F 余弦函数
CSEG F 返回CS寄存器的当前值
DEC(X) F X:=X-1
DELETE(S,POS,LEN) P 删除一个字符串的子串
DISPOSE(P) P 释放一个动态变量
DSEG F 返回DS寄存器的当前值
EOF(F) F 判断文件是否结束
EOLN(F) F 判断文件类型中的一行是否结束
ERASE(F) P 删除一个存在的外部文件。
EXIT P 过程中止
EXP(X) F 以E为底的指数函数
FILEPOS(F) F 文件记录的当前位置
FILESIZE(F) F 文件记录数
FILLCHAR(D,LEN,DATE) P 填充数值或字符
FLUSH(F) P 清空文件缓存区
FRAC(X) F 取实形变量的小数部分
FREEMEM(P,I) P 释放变长动态变量
GETDIR(DRV,PATH) P 取当前盘,当前目录
GETMEM(P,I) P 分配变长的动态变量,并把块地址存放在一个指针变量中
HALT P 立即中止程序执行,返回TP编辑器或DOS
HI(I) F 返回一个变量的高位字节
INSERT(S,D,POS) F 在一个字符串中某一位置开始插入一个子串
INT F 取整数部分
IORESULT F 返回最后一次输入/出操作的结果状态
LENGTH(S) F 取字符串的长度
LN(R) F 求自然对数
LO(I) F 返回一个变量的低位字节
MAXAVAIL F 返回最大内存空间
MEMAVAIL F 返回可用内存数目
MKDIR(PATH) P 建立一个子目录
MOVE(S,D,LEN) P 快传送
NEW(P) P 建立一个新的动态变量
ODD(X) F 判断一个变量的值是否为奇数
OFS(X) F 侧变量偏移地址
ORD(CH) F 求一个字符的ASCII码值
PARAMCOUNT F DOS参数串长度
PARAMSTR(N) F DOS参数串
PI F 圆周率的值
pos(str1,str2) f 测一个字符串中包含的另一个子串的开始位置
pred(x) f 求前驱
ptr(i) f 指针赋值
random f 返回0~1之间的随机实数
randomize p 初始化随机数发生器
read/readln(f,x) p 读入/输入数据
rename(f,str) p 给一个外部文件改名
reset(f) p 打开文件,并将文件指针指向开始,并准备读数据
rewrite(f) p 打开文件,并将文件指针指向开始,准备写资料
rmdir(path) p 删除一个子目录
round(x) f 求实数的近似数
runerror p 停止程序的运行
scrollto p 滚动显示窗口的某部分内容
seek(f,n) p 将文件指针定位于文件f的第n个文件成分上
seekrof(f) f 定位到文件尾
seekroln(f) f 定位到行尾
seg(n) f 测变量段地址
settextbuf(f) p 将输入/出缓冲区与一个文本文件建立关联
sin(x) f 正弦函数
sizeof(x) f 测变量大小
sptr f 返回sp寄存器的当前值
sqr(x) f 平方
sqrt(x) f 平方根
sseg f 返回ss寄存器的当前值
str(i,s) f 将一个整数转换成字符串
succ(X) f 后继函数
swap(x) f 交换一个变量的高位和低位字节
trunc(x) f 截去实数的小数部分
truncate(f) p 截去文件当前指针以后的内容
upcase(ch) f 将小写字母转换成大写字母
val(s,r,p) p 将一个字符串转换成数值
writeln(f,x) p 输出
dos单元常用过程与函数
getdate p 返回系统当前日期
detftime p 返回最后一次写入的日期和时间
gettime p 返回系统当前时间
packtime p 转换系统日期和时间,封装成4个字节的长整形格式
setdate p 设置系统当前日期
setftime p 写入新的系统日期和时间,覆盖系统最后一次写入的 系统日期和时间文件
settime p 设置系统当前时间
uppacktime p 将系统日期和时间转换成纪录格式
diskfree f 返回指定磁盘可用剩余空间
disksize f 返回指定磁盘的总容量
get/setverity p 返回/设置dos状态下的磁盘读写标记
fexpand f 返回函数名的全称
fsearch f 在一个目录中查找文件
fsplit f 将一个文件名分成目录、文件名、扩展名
findfirst p 在当前目录或指定目录下查找第一个与给定属性相匹 配的文件名

pascal函数库的函数——要多的
答:对数函数Ln (X):函数值为x的自然对数 平方正根根函数的Sqrt (x):函数值为x的平方正根 反正切函数Arctan(x):函数值为x的反正切,单位为弧度 随机函数Random:无自变量时,函数值取(0,1)间的随机小数;有自变量且为Word类型时,函数值取(0,自变量)间的随机整数。三、字符类型函数Turbo Pasca...

pascal程序的函数都有哪些啊?
答:Pascal程序的函数主要包括标准库函数和自定义函数。标准库函数:Pascal语言提供了一系列标准库函数,用于执行常见的数学运算、字符串处理、文件操作等任务。例如:数学函数:如`Abs(x)`返回`x`的绝对值,`Sqrt(x)`返回`x`的平方根,`Sin(x)`、`Cos(x)`和`Tan(x)`分别返回`x`的正弦、余弦和正切...

求pascal标准库函数大全 以及数学库函数!!谢谢!!
答:在FP中,Math库为我们提供了丰富的数学函数。以下介绍在OI中可能会用到的Math库中一些函数、过程。使用方法:在程序头用Uses语句加载Math库 例子:Program Ex_Math;Uses Math;Begin Writeln(hypot(3,4));End.函数介绍:hypot 原型:function hypot(x:float;y:float):float 功能:返回直角三角形中较...

pascal函数各单元的函数与过程
答:在Pascal编程中,SYSTEM TP的运行库提供了常用的标准函数和过程,无需使用USES语句即可在程序中直接调用。例如,ABS(X)函数用于求变量的绝对值,ADDR(X)则用于测试变量的地址。DOS单元集成了日期、时间处理、目录操作和程序执行功能,使得程序能够轻松管理这些基本操作。CRT单元则支持屏幕模式控制、扩展键盘码...

Pascal有哪些标准函数,及其定义
答:Pascal语言的标准函数非常多样,它们涵盖了数学运算、字符处理、类型转换等多个方面。下面我将列举几个常用的Pascal标准函数,并给出它们的定义和简单的使用示例。数学运算函数:1. Abs(x): 返回x的绝对值。例如,`Abs(-5)`将返回5。2. Sqrt(x): 返回x的平方根。例如,`Sqrt(9)`将返回3。3. ...

pascal函数数学函数与过程
答:Pascal语言提供了丰富的数学函数和过程,以方便编程中的数值计算和处理。首先,我们来看过程部分:inc(i):将变量i的值增加1。inc(i, b):将i的值增加指定整数b。dec(i):将i的值减少1。dec(i, b):将i的值减少指定整数b。randomize:用于设置随机数生成器的种子,确保每次程序运行时产生不同的...

求pascal标准库函数大全 以及数学库函数!!谢谢!!
答:Pascal语言函数集(含Delphi控件属性)abort 函数引起放弃的意外处理 abs 函数 绝对值函数addexitproc 函数 将一过程添加到运行时库的结束过程表中addr 函数返回指定对象的地址adjustlinebreaks函数 将给定字符串的行分隔符调整为cr/lf序列align 属性 使控件位于窗口某部分alignment 属性 控件标签的文字位置 allocmem 函数在...

pascal的标准函数和过程
答:PASCAL中的函数又分为标准函数与自定义函数。在这里只讲标准函数,标准函数是系统设置的函数,可以直接使用。 1.算术函数 函数标识符 自变量类型 意义 结果类型 abs 整型、实型 绝对值 同自变量 cos 整型、实型 余弦 实型 exp 整型、实型 指数 实型 int 整型、实型 整数部分 实型 ln 整型、实型...

PASCAL语言中有哪些常用函数?
答:PASCAL中,保留字分为6种共36个:(1)程序、函数、过程符号 program,function,procedure (2)说明部分专用定义符号 array,const,file,label,of packed,record,set,type,var (3)语句专用符号 case,do,downto,else,for,forward,goto,if,repeat,then,to until,while,with (4)运算符号 and,div,in,mod...

pascal函数字符串函数与过程
答:在Pascal编程中,字符串操作是常用且基础的功能。以下是关于一些主要字符串函数和过程的介绍。首先,连接字符串可以借助于concat函数,它能将多个字符串串联起来,如同数学中的加法运算。例如,concat('11','aa')的结果就是'11aa'。对于子串处理,Copy函数可以帮助我们截取字符串。通过Copy('abdag',2,3...