Программа на паскале, связанная с рядами

[Эрик007]

нужно программу написать на паскале, а я в нем ноль полный, прошу помощи. Буду очень благодарен. Так же у меня есть программа, как сказал одногруппник, она очень похожа на мой вариант, только там формулу поменять надо кажется, но я не уверен.
Первое фото-это фото с заданием, а вторые два-это другая программа, которая якобы схожа с моим вариантом.

[Вадим Мошев]

А вы сами-то не хотите разобраться?
Почему ваш одногруппник разбирается, а вы нет?

[Эрик007]

потому что одногруппник изначально знал этот язык, а помогать не хочет, потому что лень, человек такой он, иначе я бы сюда не писал

[Михаил Смирнов]

обращайтесь

[Stilet]

program Project1;
var y,xn,xk,xh,x:double;n,sign:integer;
begin
 y:=0; xn:=0;xk:=1; xh:=0.1;sign:=1;n:=1;x:=0;
 while xn<=xk do begin
   y:=y+sign*exp(ln(1+x)*(2*n));
   inc(n);
   sign:=-sign;
   xn:=xn+xh;
 end;
 write(y);
end.

[Эрик007]

а как же все остальное?) Я просто ничего не смогу сделать

[Stilet]

Я просто ничего не смогу сделать

В таких случаях обычно покупают препода )

[Эрик007]

скажите тогда, что мне нужно теперь сделать, я так понимаю написать программу вывода и пару процедур как на картинке?

[Stilet]

я так понимаю написать программу вывода

Правильно понимаешь )
Уже обнадеживает.
Вот для начала мой пример возьми за основу, разберись как он работает, и допиши в цикл вывод sign*exp(ln(1+x)*(2*n)); отдельно. Причем рекомендую эту формулу в отдельную переменную вычислять, которую потом прибавлять к "у" и выводить в цикле.

[Эрик007]

ок, спасибо), сейчас попробую