| 说明 |
C(区分大小写) |
Delphi(不区分大小写) |
PHP(区分大小写) |
| 整型变量的定义 |
char a = 'a';/*8位有符号*/
int a=10; /*16位有符号*/
unsigned int a = 10;/*16位无符号*/
short a = 10;/*16位有符号*/
unsigned short a = 10;/*16位无符号*/
long a = 10;/*32位有符号*/
unsigned long a = 10;/*32位无符号*/
|
I: ShortInt;{8位有符号}
I: Byte;{8位无符号}
I: SmallInt;{16位有符号}
I: Word;{16位无符号}
I: Integer;{32位有符号}
I: Cardinal;{32位无符号}
I: Int64;{64位有符号}
|
$i = 10;/*变量以$开头*/ |
| 实型变量的定义 |
float a = 1.0;/*4字节*/
double a = 1.0;/*8字节*/
long double a = 1.0;/*10字节*/ |
a: Single;{4字节}
b: Real48;{6字节}
c: Double;{8字节}
d: Extended;{10字节} |
$a = 3.14; |
| 字符变量的定义 |
char a = 'a';/*1字节*/ |
a: Char;{1字节}
a: WideChar;{2字节} |
$a = 'a'; |
| 固定长度字符串 |
无 |
a: ShortString; |
$a = 'a'; |
| 动态字符串 |
无 |
a: AnsiString;{一般为String} |
$a = 'Hello!'; |
| 以NULL结束的字符串 |
char a[] = "Hello!"; |
a: PChar; |
无 |
| 1字节布尔变量 |
/*任何1字节数*/ |
a: Boolean; |
任何变量都可以 |
| 加,减,乘,浮点除 |
+,-,*,/ |
+,-,*,/ |
+,-,*,/ |
| 整除 |
a = 3 / 2; /*运算符两边都是整型*/ |
a := a div b;{a,b都是整型} |
$a = 3 / 2; |
| 取模 |
a = a % b; |
a := a mod b; |
$a = $a % $b; |
| 赋值 |
a = b; |
a := b; |
$a = $b; |
| 比较 |
if (a == 12) ...; |
if a = 23 then ...; |
if ($a == 23) ...; |
| 不等于 |
if (a != 23) ...; |
if a <> 23 then ...; |
if ($a != 23) ...; |
| 小于,大于,小于等于,大于等于 |
<,>,<=,>= |
<,>,<=,>= |
<,>,<=,>= |
| 逻辑与 |
if (a && b) ...; |
if (a = 2) and (b = 3) then ...; |
if ($a && $b) ...; |
| 逻辑或 |
if (a || b) ...; |
if (a = 2) or (b = 2) then ...; |
if ($a || $b) ...; |
| 逻辑非 |
if (!a) ...; |
if not (a = 2) then ...; |
if (!$a) ...; |
| 数组定义 |
int a[10] = {0}; |
a: array[0..10] of Integer; |
$MyArray = array(1,2,3,4); |
| 记录类型 |
typedef struct{
int i;
double d;
}MyRes; |
Type
MyRec = record
i: Integer;
d: Double;
end; |
|
| 指针 |
int *a; |
a: ^Integer; |
|
| 判断语句 |
if (a == 2)
{ /*为真执行*/
}else{
/*为假执行*/
}; |
if a = 2 then
begin
{为真执行}
end else begin
{为假执行}
end;
|
if ($a == 2)
{ /*为真执行*/
}else{
/*为假执行*/
}; |
| 多重判断 |
switch (expr){
case expr1:
DoSomething;
break;
case expr2:
default: exprN;
} |
case Variable of
101: DoSomething;
102:
begin
end;
103: DoAnotherthing;
else DoTheDefault;
end;
|
switch (expr){
case expr1:
DoSomething;
break;
case expr2:
default: exprN;
} |
| for循环 |
for(expr1;expr2;expr3){
DoSomething;
}
|
for i := 10 to 20 do
begin
end;
for i := 20 downto 10 do
begin
end; |
for(expr1;expr2;expr3){
DoSomething;
}
|
| while循环(先判断) |
while(expr1)
{
} |
while(a = 30) do
begin
end; |
while(expr1)
{
} |
| while循环(后判断) |
do
{
}while(expr1); |
repeat
inc(c);
until c > 100; |
do
{
}while(expr1); |
| 跳出循环 |
break; continue; |
break; continue; |
break; continue; |
发表于 @ 2008年03月13日 10:35:00|评论(loading...)