Курсовую по pascal кто-нибудь может написать?

Постановка задачи: "Перенести в начало массива S(k) все отрицательные элементы по возрастанию, далее нулевые и затем положительные также по возрастанию. Вывести на экран и записать в файл отсортированный массив."

Содержание пояснительной записки:

1. Анализ содержательной постановки задачи
2. Предварительная декомпозиция по содержательной постановке
3. Формализация частей задачи,полученных после декомпозиции
4. Анализ альтернативных вариантов решения в зависимости от конкретно заданных исходных данных
5. Формирование алгоритма решения задачи
6. Текст программы с комментариями
7. Тестирование и отладка
8. Анализ результатов решения
9. Сопровождение программы