Exchange
procedure
Exchange
(
Index1
,
Index2
:
Integer
)
Меняет местами два элемента списка.