Написать программу для паскаля: дата вводится в формате "дд.мм.гг". записать словесно название месяца и полностью указать год. например, для 01.02.98 вывести "1 февраля тысяча девятьсот девяносто восьмой год", для 20.05.02 – "20 мая две тысячи второй год" и т.д.

Тут через оператор case нужно указывать вручную, ну я пока что легких путей не вижу.  Легкая программа, но замудренная.. 
 Пример:
case a of
        01.02.98 : writeln ('1 февраля тысяча девятьсот девяносто восьмой год');
        02.02.98 : writeln (2 февраля тысяча девятьсот девяносто восьмой год');
       Тут дата : writeln ('Тут что выводить');
 итд
      end;