swap в паскале

Ответ от Ponyfag1337[гуру]
В Паскале нету встроенной функции Swap. Её обычно пишут вручную как небольшую вспомогательную функцию для того, чтобы менять местами элементы конкретного массива/строки или значения переменных. Например:
Procedure Swap(Var a, b: integer);
Var p: integer;
begin
p := a;
a := b;
b := p;
end;
эту можно использовать, например, так:
swap(a[i],b[i]);