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

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