Купить Pascal, дано два числа, отсортировать их по возрастанию

Условие задачи: Даны два числа, x и y. Поменять их местами, если x > y.
Оплатив товар вы получите:
1. Исходный код решения задачи на языке Pascal с комментариями (в формате .pas и .txt).
2. Картинку с демонстрацией работы программы.
3. Скомпилированная программа в виде запускаемого файла.
Алгоритм решения оформлен по всем правилам культуры программирования.