Free Pascal 简要语法书

相关主题
  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。

Free Pascal 简要语法书

一、基本结构

一个FP程序一般可以分为程序首部(Program语句)、程序说明(常量、变量、自定义函数过程)和程序主体(Begin到End.)三部分。语句间用分号“;”分隔,一般一行写一条语句,程序最后用End.(句点)结束。基本框架如下:

Program 程序名(参数);

Label

标号说明;

Const

常量说明;

Type

类型说明;

Var

变量说明;

Function

函数说明;

Procedure

过程说明;

Begin

程序主体;

二、程序说明部分

1.常量定义(const)

常量名=常量数据;

2.类型说明(type)

类型名=类型

类型说明;

3.变量定义

变量名(多个变量名用逗号分开):变量类型;

变量类型

i.整数类型

ii.实数类型

iii.布尔类型

Type Range

Boolean 1 true、false

iv.字符类型

Type Range

char 1

String 默认最大255个字符

4.自定义函数

function 函数名(形式参数表):返回类型;

函数的说明部分

begin

函数主体;

……

函数名:=返回值;

end;

function max(x,y:integer):integer;

var

m:integer;

begin

if x>y then m:=x else m:=y;

max:=m;

end;

当函数被赋值后,可以用exit 直接退出函数,回到主程序。

5.自定义过程

procedure 过程名(形式参数表);

过程说明部分;

begin

过程主体;

……

end;

可以用过程exit 直接退出过程,回到主程序。

例题:

Program ex1;

Var

a:_______;

b:________;

c:_________;

Begin

a:=10;

b:=2;

c:=a/b;

writeln(c);

end.

三、表达式的书写:在程序中的表达式书写方式与数学书写方式有一些区别:

1.数学运算符号:+ - * / div mod

div 表示整除运算例13 div 4=3

mod 表示取余运算例13 mod 4=1(mod div 为运算符号前后必须留空白)

2.关系运算符号:> < <= => <>

关系运算的结果为真假值例5>7=false

<>表示不等于例8<>9=____________

3. 逻辑运算符号:not and or

not 将关系表达式的结果取反not(5>7)=____________

and 连接两个关系表达式,当这两个关系表达式的结果为真,整个表达式结果才为真

or 连接连接两个关系表达式,当这两个关系表达式有一个的结果为真,整个表达式结果就为真

》》练习:

表示x在[5,10]之间

a,b,c代表三边,表示a,b,c构成了等腰三角形,等边三角形

表示x是偶数

xyz代表一个三位数,设计公式分别计算出x,y,z的值

4.标准函数

一些比较复杂的运算,不能简单的使用以上运算符号表示,我们采用函数来计算;

特别注意:函数的应用范围

Abs(x) 函数值为x的绝对值

Sqr(x) 函数值为x的平方

Int(x) 函数值为x的整数部分

Sqrt(x) 函数值为x的平方根

Random 函数值为0-1之间的随机小数

Random(x) 函数值为0-x之间的随机整数Trunc(x) 舍去实数x的小

数部分,并转换为整型

Round(x) 对实数x作四舍五入,并转换为整型chr(x) 函数值为整数x

所对应的ascⅡ字符

ord(x) 函数值为字符x所对应的数值

所有表达式内容必要写在同一行

只能使用合法的运算符号,不能省略任何符号

只能使用小括号,可以多次使用

注意表达式计算时的优先计算顺序

》》练习题:改写一下表达式

y3+2y2+5y-7

一元二次方程求根公式

四。程序语句(每个完整的语句结束后,使用分号表示表示当前语句结束)

a)顺序语句

i.赋值语句变量:=表达式;

ii.输入语句read(变量名表);readln(变量名表);

iii.输出语句write(输出项);writeln(输出项);

iv.注释{ 块注释} // 行注释

例:(程序片断)

Program juxing;

var

l,h,s:integer;

begin

readln(l,h);

s:=l*h;

writeln(‘s=‘,s);

end.

》》练习:阅读程序写答案

x:=4;

y:=5;

相关文档
最新文档