Язык реализации - objectPascal Исходник и пример файла в архиве Рекурсивная процедура поиска оптимальной таблицы кодирования символов (исходник оригинальный - проверьте)