常用的pascal内置函数和过程
标准常量False,Maxint,True,Maxlongint,Pi
标准类型Boolean,Char,Real,Integer,Longint，等等
标准函数Abs,Arctan,Chr,Cos,Eof,Eoln,Exp,Ln,Odd,Ord,Pred,Round,Sin,Sqr,Sqrt,Succ,Trunc
标准过程Dispose,Get,New,Pack,Page,Put,Read,Readln,Reset,Rewrite,Unpack,Write,Writein 标准文件Input,Output
(1)自变量必须为整型的标准函数：
(A)前趋函数:Pred(x)，函数结果类型为整型，如：Pred⑷=3
(B)后继函数：Succ(x)，函数结果类型为整型，如I： Succ(4)=5
(C)奇函数：odd(x)，结果为布尔型。如：Odd(13)=True
(D)字符函数：Chr(x)K中x为ASCII码，函数结果为字符型。如：Chr(65)=,A*
(2)自变量为整型(或实型)，但函数值类型为实型的标准函数；
(A)平方根函数:Sqrt(x)
(B)整数函数：Int(x)取整数部分，如I： INT(3.85)= 3.0
(C)小数函数：Frac(x)
(D)正眩函数：Sin(x)
(E)余弦函数：Cos(x)
(F)反正切函数：Arctan(x)，单位为弧度
Pascal中无正切函数，用Sin(x)/ Cos(x)代替
(G)指数函数：Exp(x)，即求ex
(H)对数函数：Ln(X)，即求x的自然对数logex
幕运算xy=eylnx ,?：xy =Exp(y*ln(x)
注意：在FreePascal 中，幕的表示：xy=power(x,y)或xy=x**y
(I)随机函数：Random(x:word)，无x时，函数值取［0,1)之间的随机小数；有x且为Word类型时，函数值取［0,x)之间的随机整数。前面加上：Randomize语句。
(J)圆周率函数PI二3.1415926536
(3)自变量为整型(或实型)，但函数值类型与x 一致的标准函数
(A)Abs(x)：绝对值函数，如：Abs(-2)=2 Abs(-2.0)=2.0000000000E+00
(B)Sqr(x)：平方函数如，如：Sqr(4)=16 Sqr(4.0)= 1.6000000000E+01
(4)自变竝为整型(或实型)，但函数值类型为整型的标准函数
(A)Trunc(x)：取整数部分，如：Trunc(3.85)=3
(B)Round(x)：四舍五入，如：Round(2.8)=3 Round(-2.8)=-3
(5)加  1 函数:inc(x)如:inc(5)=6,inc(5,8)=13
(6)减  1 函数dec(x)如I： dec(5)=4 dec 5,3)=2
文件函数：
时，函数值为false；读到文件结束符(1) Eof(f)或Seekeof(f)未读到文件结束符“Chr(26) ”
或“Ctri+Z”
时，函数值为true;
时，函数值为false; 读到行结束符或文件结束⑵Eoln(f)或SeekEolf(f)未读到行结束符“Chr(13) ”
符时，函数值为true;
字符函数
(1)小写字母转为大写字母Upcase('x')，如:Upcase (,a')=,A,
(2)前趋函数：Pred(W)，函数结果为字符型，如：Pred(,4>,3, ⑶后继函数：SuccCx*)，函数结果为字符型，如:SuccCAXB
(4)序数函数：OrdCx*)，函数结果为整型，求字符对应的ASCII码，如：Ord(,A,)=65
(5)字符函数:Chr(x) , x为整型，函数结果为字符型，，求ASCII码对应得字符，如:Chr(65)=,A,
字符串函数
(1)求长度length
定义：function Length(S: String): Integer;
(2)复制子串copy
定义：function Copy(S: String; Index: Integer; Count: Integer): String;
注意：S是字符串类型的表达式。Index和Count是整型表达式。Copy返回S屮从Index 开始，Count个字符长的一个子串。
(3)插入子串insert
定义：procedure Insert(Source: String; var S: String; Index: Integer);
注意：Source是字符串类型的表达式。S是任意长度字符串类型变量。Index是整型表达式。Insert 把Source插在S中Index处。如果结果字符串的反度大于255，那么255之后的字符将被删除。
(4)删除子串delete
定义：procedure Delete(var S: String; Index: Integer; Count:Integer);
注意：S是字符串类型变量。Index和Countare是整型表达式。Delete删除S屮从Index 开始的Count个字符。如果Index大于S的长度，则不删除任何字符；如果Count大于S中从Index开始的实际字符数，则删除实际的字符数。
(5)字符串转为数值val
定义：procedure Val(S; var V; var Code: Integer);
在这里:S是由一系列数字字符构成的字符串类型变量；。V是整型或实型变量；Code是Integer 型变量
注意：Val将S转为它的数值形式。
(6)数值转为字符串str
定义：procedure Str(X [: Width [: Decimals ]]; var S:string)；注意：将数值X 转成字符串形式。(7)求子串起始位置pos
定义：function Pos(Substr: String; S: String): Byte;
注意：Substr和S字符串类型表达式。Pos在S中搜索Substr并返回?一个integer值。这个值是Substr的第一个字符在S中的位置。如果在S中没有到Substr，则Pos返回0。
(8)字符完全串连+联
定义：操作符加号+把两个字符串联在一起。
(9)字符串压缩空格串连？
定义：操作符减号-去掉第一个字符串最后的空格后，将两个字符串联在一起。
(10)将数组批量填入初值，Fillchar(x,sizeof(x),0)，将0填入到x数组屮，sizeof(x)表示填入的个数
三、3个重要的退出语句
HALT结束程序，返回操作系统
EXIT结朿过程或函数，返回调用处(在主程序中同HALT)
BREAK是用来退出其所在的循环语句(CONTINUE是继续当前循环)1.算术函数
函数标识符自变量类型意义结果类型
abs整型、实型绝对值同自变量
arctan整型、实型反正切实型
cos整型、实型余弦实型exp整型、实型指数实型frac整型、实型小数部分实型int整型、实型整数部分实型In整型、实型自然对数实型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(乂)二y
3.转换函数
函数标识符自变量类型意义结果类型chrbyte自变量对应的字符字符型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的图形软件包。
TURB03兼容TP3.0的源程序。
OVERLAY实现高级覆盖管理
SYSTEM单元常用过程与函数
ABS(X) F求变量的绝对值
ADDR(X) F测变量地址
APPEND(F) P打开一个存在的文本文件，并将文件指针指向文件末尾准备添加元素
ARCTAN(X) F 反正切
ASSIGN(EC) 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(S3) F 字符串合并
CONTINUE P继续循环
COPY(S,POS,LEN) F返回一个字符串的子串
COS(X) F余弦函数
CSEGF返冋CS寄存器的当前值
DEC(X)FX:=X-1
DELETE(S,POS,LEN) P删除一个字符串的子串
DISPOSE(P) P释放一个动态变量
DSEG F返回DS寄存器的当前值
EOF(F) F判断文件是否结束
EOLN(F) F判断文件类型屮的一行是否结束
ERASE(F) P删除一个存在的外部文件。
EXITP过程中止
EXP(X) F以E为底的指数函数
trunc函数exFILEPOS(F) F文件记录的当前位置
FILESIZE(F) F文件记录数
FILLCHAR(D,LEN,DATE) P填充数值或字符
FLUSH(F) P清空文件缓存区
FRAC(X) F取实形变量的小数部分
FREEMEM(RI) P释放变长动态变量
GETDIR(DRV,PATH) P取当前盘，当前目录
GETMEM(P,I) P分配变反的动态变量，并把块地址存放在一个指针变量中
HALTP立即中止程序执行，返回TP编辑器或DOS
H1(I) F返回一个变量的高位字节
INSERT(S,D,POS) F在一个字符串屮某一位置开始插入一个子串INTF取整数部分IORESULTF返回最后一次输入/出操作的结果状态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 参数串PIF圆周率的值pos(strl,str2) f测一个字符串中包含的另一个子串的开始位置pred(x) f求前驱ptr(i) f指针赋值random f返回0?1 Z间的随机实数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(Q 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返回最后一次写入的Id期和吋问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在一个目录屮查文件fsplitf将一个文件名分成目录、文
件名、扩展名
find first p在当前目录或指定目录下查第一个与给定属性相匹配的文件名
作者：巫山维云2005-2-7 16:49冋复此发言
3 turbo pascal基本函数过程及解释findnext p返回下一个满足匹配条件的文件名getfattrp返回文件的属性setfattr p设置文件属性gerintvec p返回某个中断变量值intr p执行软中断msdos p执行dos系统调用setintvec p设定中断值exec p通过一个特定命令行执行特定程序段keepp中断程序的执行但仍驻留在内存中swapvectors p用当前变量交换所有屮断变量值dosexitcode f回到子程
序出口dosversion f 显示dos 版木crt单元assigncrt(f) p将文本文件f与显示器crt建立联系clreol p清除当前行光标所在位置以后的字符clrscrp清除当前窗口或屏幕，光标返回到左上角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(xl,yl,x2,y2) p在屏幕定义一个
文本窗口

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