[[3@zzzzz]

написал процедуру на delphi:

procedure swap(a,b:int);
begin
a:=a+b;
b:=a-b;
a:=a-b
end;

а он ее не выполняет. Почему?