рекурсия для расчета суммы

[mego4el]

Пожалуйста, помогите разобраться и написать программу:

Использовать рекурсию для расчета суммы 2+1/(2!) + 1/(3!) +...+1/(N!). (выражение "N!" - обозначает произведение всех целых чисел от 1 до N: N! = 1 * 2 * ... * N). Полученное число является приближенным значением константы e = exp(1) (=2,718281...). Количество членов последовательности задается пользователем как аргумент функции.

[veniside]

function factorial(n: integer): integer;
begin
  if (2 > n) then result := 1
  else
    result := n * factorial(n - 1);
end;

function exp(N: integer): double;
begin
  if (2 > N) then result := 2
  else
    result := 1 / factorial(N) + exp(N - 1);
end;

[mego4el]

пожалуйста, вы бы могли прокомментировать код, спасибо.