8 lines
93 B
ObjectPascal
8 lines
93 B
ObjectPascal
procedure Swap_T(var a, b: T);
|
|
var
|
|
temp: T;
|
|
begin
|
|
temp := a;
|
|
a := b;
|
|
b := temp;
|
|
end;
|