Не могу через delphi 7 решить задание.

Нужно дать решения задач с использованием массивов и циклов для их обработки.
Создать соответствующий массив, в случае необходимости инициализировать его как константу и выполнить с ним действия, указанные в варианте задачи. Разработать логически обоснованный и понятный интерфейс программа - пользователь.
Задан одномерный массив целых чисел, поменять местами элементы с номерами I и J (ввести с клавиатуры) .