Сортировка текстовых файлов. Программу для осуществления Bubble sort и Simple Selection

[olegts94]

Здравствуйте, помогите пожалуйста с программным кодом Паскаль. Дело в том, что мне нужно сделать программу для осуществления Bubble sort и Simple Selection для заданных текстовых файлов (.txt). Необходимо, чтобы пользователь мог сам выбрать необходимый файл и выбрать какой из методов сортировки ему нужен, но также чтобы весь процесс отображался на консольной панели.

Программа должна выполнять следующие процедуры:

1. Прочтения массива из файла (.txt):
procedure ReadArray(FileName: string; var A: array of integer; var N: integer);
FileName – имя файла,
A – массив,
N – количество элементов массива.

2. Написания отсортированного массива в файл:
procedure WriteArray(FileName: string; var A: array of integer; N: integer);
FileName – file name,
A – массив,
N – количество элементов массива.

3. Процедуры сортирования массива:
procedure SimpleExchange(var A: array of integer; var N: integer; var S, P: integer);
procedure SimpleSelection(var A: array of integer; var N: integer; var S, P: integer);
A – array to be sorted,
N – number of elements in array,
S - number of accomplished comparisons,
P - number of accomplished swaps.

ЗАРАНЕЕ ОГРОМНОЕ СПАСИБО!