Вычислить сумму первых n заданных чисел в последовательности

08.06.2010, 13:34. **Показов** 648. **Ответов** 3

Студворк — интернет-сервис помощи студентам

вычислить сумму первых n заданных чисел в последовательности Аn для которого /Аn-An-1/<E.
An=(1-1/2)(1-1/3)...(1-1/n+1).
E-эпсилон
незнаю че даже тут делать) помогите)

@Mиxaил · 08.06.2010, 15:56

Сообщение от tomas876

/Аn-An-1/<E

ну, вообще-то, эта запись равна: |-1|<E, если An-An=0;

@Mad_Dog · 08.06.2010, 16:02

Ну, вообще-то, тут имелось ввиду ABS(A{n} - A{n-1})<Eps... Т.е. модуль разности между предыдущим членом последовательности и последующим...

08.06.2010, 20:54

а как делать то? я даже не имею понятия.

Добавлено через 1 час 15 минут

Pascal

Program cikl;
Uses
CRT;
 
var
i:integer;
begin
clrscr;
st:=-1;
f:=0,5
for i:=1 to n do
begin
f:=f*(x-st-1)/(st+1);
st:=2*st;
 
end;
readln;
end.

типо чета токого? но она все равно не работает. Я незнаю причем тут эпсилон нужен.

tomas876
		1
	Вычислить сумму первых n заданных чисел в последовательности 08.06.2010, 13:34. Показов 648. Ответов 3 Метки нет (Все метки) вычислить сумму первых n заданных чисел в последовательности Аn для которого /Аn-An-1/<E. An=(1-1/2)(1-1/3)...(1-1/n+1). E-эпсилон незнаю че даже тут делать) помогите)

@Mиxaил 541 / 446 / 162 Регистрация: 10.12.2009 Сообщений: 1,857
	08.06.2010, 15:56	2
	Сообщение от tomas876 /Аn-An-1/<E ну, вообще-то, эта запись равна: \|-1\|<E, если An-An=0; 0

@Mad_Dog Фрилансер 452 / 433 / 117 Регистрация: 01.06.2010 Сообщений: 1,314
	08.06.2010, 16:02	3
	Ну, вообще-то, тут имелось ввиду ABS(A{n} - A{n-1})<Eps... Т.е. модуль разности между предыдущим членом последовательности и последующим... 0

Опции темы