** паскале:Рассчитать сумму ряда с общим членом An=1/(n+3) c точность до 0,03

Question

На паскале:
Рассчитать сумму ряда с общим членом An=1/(n+3) c точность до 0,03

Comments

ряд рандомный?

---

честно понятия не имею, всё что было написано в задании

Answer 1

Принцип такой, формулу свою вставь
uses crt;
var x,e,s,t:real;    
 k:integer;
begin
clrscr; e:=0.000001;
write('x=');
readln(x);
s:=0; t:=1; k:=0;
while abs(t)>e do
 begin  
 k:=k+1;  
 t:=-t*x*x/(2*k*(2*k-1));
   s:=s+t;
 end;
write('S=',s:0:6);
readln;
 end.