《2022年Pascal简单教程 .pdf》由会员分享，可在线阅读，更多相关《2022年Pascal简单教程 .pdf（6页珍藏版）》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。
1、Pascal 基础知识PASCAL 语言入门第三节一个 PASCAL 程序一、 编辑功能健：光标键：用以上下左右移动光标位置；INSERT ：插入 / 改写状态切换；TAB ；光标跳至下一制表位；CAPSLOCK：大小写切换；DELETE ：删除光标位一字符；BACKSPACE：删除光标前一字符；CTRL+Y ：删除光标处一行；HOME ：光标跳至行首；END ：光标跳至行未；PAGEUP：上翻一页；PAGEDOWN：下翻一页；ENTER ：回车 / 换行；如果程度出错，则程序没有被运行完就会回到集成环境中，并且光标停在错误的这一行，在编辑窗口中的第一行还会显示出错信息，如：Run-time
2、error 错误代码 at 错误发生地址PASCAL 的数据类型一、整数类型（没有小数部分）INTEGER ：取值范围 -32768 ，32767 。占用内存2 个字节（ 16 位）。WORD：取值范围 0 ，65535 。占用内存2 个字节（ 16 位）。BYTE ：取值范围 0 ，255 。占用内存1 个字节（ 8 位）。LONGINT ：取值范围 -2147483648 ，2147483647 。占用内存4个字节（ 32 位）。SHORTINT ：取值范围 -128 ， 127 。占用内存1 个字节（ 8 位）。二、实数类型REAL ：取值范围 2.9E-39 ， 1.7E+38 。占用
3、内存6 个字节（ 48 位）。实数的表示法有两种：1、直接表示，如：-0.4576, 123.567, -234, 0 2、科学计数法，如：1.234E-4, -3.546E12表示 1.234 乘 10 的负 4 次方； -3.546 乘 10 的 12 次方。三、字符类型CHAR ：单字符型，即取1 个字符，如 A，1。STRING ：字符串型，即多个字符，如ABCD ！123， % ￥#DS12 。名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 1 页，共 6 页 - - -
4、- - - - - - 如果一个常 / 变量只要用到1 个字符，则可把它定义成CHAR 型；如果是多个字符，但不知确切多少个，则定义成STRING型，如果知道确切有N个字符，则定义成STRINGN型，例如STRING5，则表示定义的这个字符串变量由5 个字符组成。字符串在PASCAL 中使用都是加上单引号。四、布尔型BOOLEAN：布尔型即为逻辑型，取值为TRUE 、FALSE ， 即真、假。程序头部的说明语句在程序头部的说明语句中，可有以下几种引导词，例：LABEL 10 ，30： 说明程序中要用到两处标记（即行号）10 和 30；此项不用掌握。定义了 3个常量CONST p=123； a=
5、12.346; s= abcdefg ; 定义了 I ，J，K三个变量是整数型； X，Y是实数型； S1是 5 个字符组成的字符串；P是布尔型。VAR I,j,k:integer; X,y:real; S1:string5; P:boolean; 定义了一个自定义的数据类型T，其包含两个整数及一个字符串，这种数据类型我们也将在后而详细讲。TYPE T=record Tn,tm:integer; Ts:string;End; 整数类型包括正整数和负整数和0 1,204在会计统计中是允许的，但在Pascal中是非法的整数类型的标识符为integer，取值范围是： -3276832767在 free
6、 Pascal中，允许采用十六进制（前加）或二进制（前加）表示名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 2 页，共 6 页 - - - - - - - - - 如 x:= 101,相当于 x:=5;y:=10, y:=16 整数的类型：名称类型标识符数据范围短整型Shortint -128127长整型Longint -21474836482147483647 字节型Byte 0255 字型Word 065535 整数类型Int64 -9223372036854775808 92
7、23372036854775807 无符号整数Qword int64 018446744073709551615 注意：int64 不是有序类型。 直接给出一个 int64 类型的变量赋值一个超过longint范围的整数是非法的。这是因为free pascal 在表达式的计算中默认最大类型为longint。完整的 PASCAL 程序框架Program 程序名（程序参数表）Label 标号说明Const 常量说明Type 类型说明Var 变量说明Function 函数说明Procedure 过程说明Begin 程序语句,End. 程序结束Free pascal标准数据类型、内置函数等必备知识一、
8、实型整型实型 :数值范围 :占字节数 :有效位数real:2.9e-39.1.7e38:6:11.12 single:1.5e-45.3.4e38:4:7.8 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 3 页，共 6 页 - - - - - - - - - double:5.0e-324.1.7e308:8:15.16 extended:3.4e-4951.1.1e4932:10:19.20 comp:-2*63+1.2*63-1:8:19.20 整型 :数值范围 :占字节数
9、:格式shortint:-128.127:1: 带符号 8 位integer:-32768.32767:2: 带符号 16 位longint:-2147483648.2147483647:4: 带符号 32 位byte:0.255:1: 无符号 8 位word:0.65535:2: 无符号 16 位longword:0.4294967295:4 Cardinal:either word, longword or qword:size 2/4/8 Int64:-9223372036854775808.9223372036854775807:8 QWord:0.184467440737095516
10、15:8 二、常用的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,Writeln 标准文件Input,Output (1)自变量必须为整型的标准函数: (A
11、) 前趋函数： Pred(x)，函数结果类型为整型，如：Pred(4)=3 (B) 后继函数： Succ(x)，函数结果类型为整型，如：Succ(4)=5 (C)奇函数： odd(x)，结果为布尔型。如：Odd(13)=True (D) 字符函数： Chr(x) 其中 x 为 ASCII 码，函数结果为字符型。如：Chr(65)=A (2)自变量为整型 (或实型 )，但函数值类型为实型的标准函数；(A) 平方根函数：Sqrt(x) (B) 整数函数： Int(x) 取整数部分，如：INT(3.85)= 3.0 (C)小数函数： Frac(x) (D) 正弦函数： Sin(x) (E) 余弦函数
12、： 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)圆
13、周率函数PI=3.1415926536 (3)自变量为整型 (或实型 )，但函数值类型与x 一致的标准函数名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 4 页，共 6 页 - - - - - - - - - (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)自变量为整型 (或实型 )，但函数值类型为整型的
14、标准函数(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) 如： dec(5)=4 dec 5,3)=2 文件函数：(1) Eof(f) 或 Seekeof(f)未读到文件结束符“Chr(26) ”或“Ctrl+Z ”时，函数值为false; 读到文件结束符时，函数值为true; (2) Eoln(f) 或 SeekEolf(f) 未读到行结束符“Chr(13) ”时
15、，函数值为false; 读到行结束符或文件结束符时，函数值为true; 字符函数(1)小写字母转为大写字母Upcase(x) ，如： Upcase (a)=A (2)前趋函数： Pred(x)，函数结果为字符型，如：Pred(4)=3 (3)后继函数： Succ(x)，函数结果为字符型，如：Succ(A)=B (4) 序数函数： Ord(x), 函数结果为整型,求字符对应的ASCII 码，如： Ord(A)=65 (5)字符函数：Chr(x) ， x 为整型，函数结果为字符型， ,求 ASCII 码对应得字符， 如： Chr(65)=A 字符串函数(1)求长度 length 定义： funct
16、ion 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 是任意长
17、度字符串类型变量。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 开始的实际字符数，则删除实
18、际的字符数。(5)字符串转为数值val 定义：procedure Val(S; var V; var Code: Integer); 在这里 :S 是由一系列数字字符构成的字符串类型变量；。 V 是整型或实型变量；Code 是Integer 型变量注意： Val 将 S 转为它的数值形式。(6)数值转为字符串str 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 5 页，共 6 页 - - - - - - - - - 定义：procedure Str(X : Width : Deci
19、mals ; 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是继续当前循环) 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 6 页，共 6 页 - - - - - - - - -