Pascal, Программирование, Нейросеть

Посоветуйте нейросеть которая сделает код для этого задания:


Задание
Создать программу (PascalABC code) для хранения и обработки данных. Программа должна иметь меню пользователя и модульную структуру, то есть состоять из подпрограмм. Состав подпрограмм:
1. Модуль создания нового файла-таблицы
2. Модуль выбора существующего файла-таблицы
3. Модуль ввода записей в таблицу
4. Модуль отображения таблицы на экране
5. Модуль удаления записей из таблицы
6. Модуль модификации (изменения) записей в таблице
7. Модуль меню выполнения запросов
8. Модуль выполнения требуемых запросов к таблице

Для работой с программой будет удобно использовать встроенный модуль CRT. Он подключается в самом начале программы с помощью команды: uses CRT. Удобство использования этого модуля связано с применением следующих процедур:
1) TextBackground(n)
2) TextColor(n)
3) Clrscr - очистка экрана
4) и другие.....


Основываясь на этой информации создай ведомость телефонных переговоров.

Структура записей:
Номер телефона вызывающего абонента
Номер телефона вызываемого абонента
Дата разговора (год, месяц, день)
Продолжительность разговора (в минутах)
Тариф (плата в рублях за минуту)
Стоимость разговора (произведение продолжительности разговора на тариф)

Запись для удаления выбирается по полю "Номер телефона вызывающего абонента".

Запись для изменения выбирается по полю "Номер телефона вызываемого абонента", изменяемое поле - Тариф. При изменении тарифа поле "Стоимость разговора" должна пересчитываться.

Запросы:
1) Вывести запись обо всех разговорах продолжительностью более 10 минут.
2) Вывести среднюю продолжительность всех разговоров.
3) Вывести все разговоры вызывающего абонента A за месяц B (A и B вводит пользователь).
4) Вывести общую стоимость всех разговоров за месяц X (X вводит пользователь).
5) Вывести самый продолжительный разговор
6) Упорядочить (и вывести) таблицу по полю "Номер телефона вызывающего абонента" по возрастанию.