pascal基础

基本数据类型（常用）

整数类型：Integer

实数类型：Double

字符类型：Char

字符串类型：String

布尔类型：Boolean

数据类型转换

inttostr(x)　　将字符串x转换成int，前提是x为数值型字符串

相应的还有：strtoint(x)、floattostr(x)、strtofloat(x)

运算符（需注意的）

1、算术运算符：

+、-、* 等运算符和 C 语言相应的运算符一样

除法：/   ,例如：a/b，无论a,b是整形还是实型，结果都是实型

整除除法： Div  ,例如：a Div b，要求a,b必须为整形

求余：Mod  ,例如：a Mod b，要求a,b必须为整形

2、布尔运算符：

布尔运算符只能对两个布尔型操作数进行运算，结果仍为布尔型，即只能为 True 或者 False。基本的布尔运算符有 4 个：NOT、AND、OR 和 XOR。

NOT：NOT a，若 a 为 True，则结果为 False；若 a 为 False，则结果为 True。

AND：a AND b，只有当a,b同时为 True，结果才为 True。

OR：a OR b，当a,b其中至少有一个为True，结果为 Ture。

XOR：a XOR b，只有当a,b不同时，结果才为 True。

3、位运算符：

NOT、AND、OR、XOR和C语言里相应的运算符一样

SHL：a SHL b，将 a 的二进制值向左移动 b 位，左移一位相当于乘 2

SHR：a SHR b，将 a 的二进制向右移动 b 位，右移一位相当于除 2

条件语句

条件语句主要分为： if 语句和 case 语句

begin..end; 可以看成C语言里的花括号，if 后面语句超过一条记得加begin...end;这和C语言类型，while等也是类似

1、if 语句

语法：

if <条件> then [<语句1>][else <语句2>]；

例如：

  if (x>10) and (y>5) then
    z:=x+y     //注意：这里不需要加分号
  else
    z:=2*(x+y);//还可以再嵌套if then else语句

2、case 语句

语法：

  case <选择器表达式> of
    <情况常量表1> : <语句1>;
    .
    .
    .
    <情况常量表n> : <语句n>;
    else
      <其它语句>;
  end;

例如：

  case Trunc((w-0.00001)/50) of   //Trunc 为取整函数
    0: x:=0.25*w;
    1: x:=0.25*50+0.35*(w-50);
    else
      x:=0.25*50+0.35*50+0.45*(w-100);
  end;

 循环语句

循环语句主要分为：while 语句、repeat 语句及 for 语句

1、while 语句

语法：

while <条件> do
    循环体;       //循环体需用begin...end括起来

例如：

  while n<=100 do
    begin
      s:=s+n;
      n:=n+1;
    end;

2、repeat 语句

先执行循环体再判断，和do...while类似

语法：

  repeat
   循环体;
  until <条件>;

例如：

  repeat
    r:=m mod n;
    m:=n;
    n:=r;
  until r=0;

3、for 语句

语法：

  for <循环变量>=<初值> {to|down} <终止> do
    begin
      循环体;
    end:

例如：

  for i:=0 to 20 do
    begin
      sum;=sum+i;
    end:

数组

1、一维数组

定义：

var 数组名:array[1..n] of integer;

例如：

var a:array[1..10] of integer;   //定义一个整型的a[10]

数组调用：pascal数组下标从1开始，其他和C语言调用类似

---

参考资料：

Delphi 程序设计教程（第3版），杨长春主编，清华大学出版社