Gotoxy (28,wherey) ;writeln ('БАЗА ДАННЫХ ПО СОТРУДНИКАМ').Тема: База данных Сотрудники.• Уволить (удаляет информацию об уволенном сотруднике из массива данных).Информация о сотрудниках фирмы хранится в файле workers.dat.Информация о новом сотруднике вводится в диалоге типа Введите фамилию сотрудника: и т.д.Процедура Уволить запрашивает ввод фамилии И.О. увольняемого сотрудника.Процедура Найти выводит на экран список сотрудников, работающих в указанной должности.Уволить сотрудника - стирает служащего по введенному регистрационному номеру и Ф.И.О.Writeln (' Список сотрудников').Приложение 2 (распечатка структуры базы данных).