Вычислить функцию! Опции

[-Maks-]

Помогите, пожалуйста, решить задачу:

Вычислить с применением repeat ... until: b=1+(xlna)/1! + ((xlna)^2)/2! + ... + ((xlna)^n)/n!=a^x. Исходные данные: епсилон=0,01, х=3.0, альфа=2,5. Ответ: 15,62.

[volvo]

MoM, пойми, я не просто так дал тебе ссылку на разложение в ряд... Тебе как таковой файториал не нужен! Смотри:
x0 = 1
x1 = x*lna / 1
x2 = (x*lna)^2 / 2! = x1 * (x*lna) / 2
x3 = (x*lna)^3 / 3! = x2 * (x*lna) / 3
...

Понимаешь? Это и есть рекуррентная последовательность - зная предыдущий элемент вычисляешь последующий... А иначе, например, при вычислении 14-го элемента последовательности (если он был бы тебе нужен), тебя бы ждал сюрприз Факториал-то не помещается даже в LongInt ...