说明：X可以是整型，也可以是实型；返回值和X的类型一致例子：
取整函数int(x)
定义：function Int(X: Real): Real;
注意：X是实型数，返回值也是实型的；返回的是X的整数部分，也就是说，X被截尾了（而不是四舍五入）例子：
var R: Real;
begin
R := Int(123.567); { 123.0 }
SYSTEM TP的运行库，包括常用的标准函数和过程，可以在程序中直接使用，不需USES语句说明。
DOS具有日期、时间、目录查找、程序执行等功能
CRT具有屏幕模式控制、扩展键盘码、颜色、窗口、声音等功能
PRINTER支持打印输出操作。
GRAPH高级图形软件包，支持多种图形适配器。
GRAPH3实现TP3.0的图形软件包。
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
settime p设置系统当前时间
uppacktime p将系统日期和时间转换成纪录格式
diskfree f返回指定磁盘可用剩余空间
disksize f返回指定磁盘的总容量
get/setverity p返回/设置dos状态下的磁盘读写标记
fexpand f返回函数名的全称
fsearch f在一个目录中查找文件
intr p执行软中断
msdos p执行dos系统调用
setintvec p设定中断值
exec p通过一个特定命令行执行特定程序段
keep p中断程序的执行但仍驻留在内存中
swapvectors p用当前变量交换所有中断变量值
dosexitcode f回到子程序出口
dosversion f显示dos版本
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参数串
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定义图形方式窗口
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将一个字符串转换成数值
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平方根
Writeln(1.5, ' becomes ', Trunc(1.5)); { 1 }
Writeln(-1.4, 'becomes ', Trunc(-1.4)); { -1 }
Writeln(-1.5, 'becomes ', Trunc(-1.5)); { -1 }
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填充数值或字符
INSERT(S,D,POS) F在一个字符串中某一位置开始插入一个子串
INT F取整数部分
IORESULT F返回最后次输入/出操作的结果状态
LENGTH(S) F取字符串的长度
LN(R) F求自然对数
LO(I) F返回一个变量的低位字节
MAXAVAIL F返回最大内存空间
MEMAVAIL F返回可用内存数目
textcolor(color) p设置正文前景颜色
textmode p选择特定的文本显示模式
wherex/y f返回当前光标位置的坐标值
window(x1,y1,x2,y2) p在屏幕定义一个文本窗口
其他单元
chain(f) p目标程序链接
execute(f) p执行目标程序
mark(p) p标记动态变量
reset(f) p打开文件，并将文件指针指向开始，并准备读数据
rewrite(f) p打开文件，并将文件指针指向开始，准备写资料
rmdir(path) p删除一个子目录
round(x) f求实数的近似数
runerror p停止程序的运行
scrollto p滚动显示窗口的某部分内容
seek(f,n) p将文件指针定位于文件f的第n个文件成分上
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);
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 }
2.标准函数
函数标识符自变量类型意义结果类型
odd整型判断奇数布尔型
pred离散类型求前趋同自变量
succ离散类型求后继同自变量
例：odd(1000)=false pred(2000)=1999 succ(2000)=2001
odd(3)=true pred('x')='w succ('x')='y'
writeln(f,x) p输出
dos单元常用过程与函数
getdate p返回系统当前日期
detftime p返回最后一次写入的日期和时间
gettime p返回系统当前时间
packtime p转换系统日期和时间，封装成4个字节的长整形格式
setdate p设置系统当前日期
setftime p写入新的系统日期和时间，覆盖系统最后一次写入的系统日期和时间文件
crt单元
assigncrt(f) p将文本文件f与显示器crt建立联系
clreol p清除当前行光标所在位置以后的字符
clrscr p清除当前窗口或屏幕，光标返回到左上角
delay(t) p等待t毫秒
delline p清除光标所在行上所有内容
gotoxy(x,y) p将光标移到屏幕某处
highvideo 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中断调用
fsplit f将一个文件名分成目录、文件名、扩展名
findfirst p在当前目录或指定目录下查找第一个与给定属性相匹配的文件名
3 turbo pascal基本函数过程及解释
findnext p返回下一个满足匹配条件的文件名
getfattr p返回文件的属性
setfattr p设置文件属性
gerintvec p返回某个中断变量值
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关闭文件
FLUSH(F) P清空文件缓存区
FRAC(X) F取实形变量的小数部分
FREEMEM(P,I) P释放变长动态变量
GETDIR(DRV,PATH) P取当前盘，当前目录