На паскале:Рассчитать сумму ряда с общим членом An=1/(n+3) c точность до 0,03
На паскале:
Рассчитать сумму ряда с общим членом An=1/(n+3) c точность до 0,03
Гость
Ответ(ы) на вопрос:
Гостьпринцип такой, формулу свою вставь
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.
Не нашли ответ?
Похожие вопросы