Технический форум - Помогите пожалуйста. Необходимо вычислить в Pascal

Цитата:

Сообщение от yartttrtrtrtert (Сообщение 1034851)

При решении использовал функцию power, но преподаватель просит использовать exp. Буду искренне благодарен Вам)

Дорогой студент, передайте, пожалуйста, Вашему преподавателю от моего имени, что он (преподаватель) - безграмотный неуч и шарлатан. Потому как использование функции Exp в данном случае невозможно, поскольку выражение Exp((k+1)*Ln(-1)), которое он, скорее всего, подразумевает - бессмысленно: логарифма от отрицательно числа не бывает.
Задача может быть легко решена вообще без использования возведения в степень. Например, так:

Код:

Sum:=1/2;

a:=1/2;

for k:=2 to N do

 begin

  a:=-a*(k-1)/(k+1);

  Sum:=Sum+a;

 end;