Программа переименования файлов

У меня есть много архивов, в каждом из них 3-4 файла из них только 1 word-документ (возможны форматы rtf, doc, docx). Проблема в том что у архивов нормальные имена, а у word-документов номера. Мне нужно извлечь эти архивы так, что бы word-документу из каждого архива было присвоено такое же имя какое было у архива в котором он лежал. Вижу 2 варианта:

1. Программа будет переименовывать их во время извлечения

2. Все архивы могу извлечь по команде "Каждый архив в отдельную папку" тогда папкам присвоятся правильные имена. Программке останется присвоить word-документу внутри каждой папки такое же имя как у папки в которой он лежит.

Предполагается что внутри каждого архива (или папки) только 1 word-документ, поэтому конфликт имён невозможен.

Если вы не очень поняли задание, пишите на [email protected] я вам вышлю пробные архивы, если поняли буду рад увидеть на этой же почте цену выполнения.