@Dudl200,1. Тег SWAP(a,b) не должен был использоваться> Вы где-нибудь в вопросе упоминали, что можно использовать, а что нельзя? Если Вы не ставите ограничения в ответе, то пользователь в праве писать программу так, как угодно ему, но с тем же результатом. К тому же, здесь процедура Swap используется, чтобы не было отрицательного значения (хоть и можно было использовать Abs.