Задачки

[Kitte]

Люди помогите пожалуйста Две задачки оч нужно для зачета )) Сама вобще не пойму как делать.
Вот что нужно: 1) Программа, которая любую введенную дату из строки вида '1.1.97' или '01.01.97' преобразует и выводит в строке вида '1 января 1997 года'
2) Напишите программу построения в графическом режиме графика функции (функций) (по заданию 3й задачи)
И вот условие из третьей задачи: напишите программу для вычисления и вывода таблицы значений натур чисел и их факториалов [ где N! = 1*2*3*...*(N-1)*N ] (наибольшее число N вводится пользователем) эта задача нужна для второй. ее не надо решать)))
Плллллиз кто может помогите

[Stilet]

Смысл первой задачи может выглядеть так:

  const m:array[1..12] of string=('янв','февр','март','май','апр','июнь','июль','авг','сент','окт','ноя','дека');
  var s:string;e,i:integer;
begin
 s:='01.02.2006';
 delete(s,1,pos('.',s));
 s:=copy(s,1,pos('.',s)-1);
 val(s,i,e);
 if e=0 then
 write(m[i]);
 readln;
  { TODO -oUser -cConsole Main : Insert code here }
end.

т.е. в массив забиваем названия месяцев. Вычленяем из даты номер месяца и выбираем из массива его название.