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