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