PASCAL 两个字符的交换

var
a,b,t :char;
begin
t:=a;
a:=b;
b:=t;
end.

var
a :string;
begin
a:='';
end.

char不能为空的

1.交换：
var a,b,c:char;
begin
a='a'; b='b';
c=a;
a=b;
b=c;
{此时a='b',b='a'}
end.
2.空：
var a:char;
begin
{此时a为空}
end.

var
a,b,t:char;
begin
a:='A';
b:='B';
t:=a;
a:=b;
b:=t;
end.
就像两杯水要交换，需要增加一个同类型的临时变量。