Две задачи. Вычислить функцию

[VADIG14]

помогите решить алгоритмы 4 5 6 7 8!

[Naeel Maqsudov]

Сообщение перенесено в соответствующий раздел.
По традиции автор вопроса не указал на каком языке
программирования это надо сделать...
А также не последовал всем остальным рекомендациям

[baranker]

народ помогите сделать народ у меня задача я вроде все написал да мои алгоритмы не подходят слишком большие числа в этой задаче прошу вас о помощи может вы можете мне чем-нибудь помочь?задача в turbo pascal
дано X
определить

y=значек суммы (n=2 до 14) x^(2n-2)/(2n+1)!

думаю все надо делать через функцию по крайней мере я так делал но все неудачно!function power (const x:real;const n:byte):real;
var
i,znam,p:integer;
res,chisl:real;
begin
result:=0; chisl:=1; znam:=1; p:=2;
res:=1;
for n=2 to 14 do
for i:=1 to 2*n-2 do res:=res*x;
power:=res;
end;
вот правильно я написал ли функцию вычисления возведения в степнь?