Вычисление последовательностей, помогите плиз Опции

[Beauty_]

Даны числовой ряд и некоторое число E. найти сумму тех членов ряда, модуль которых больше или равен заданному E. общий член ряда имеет вид

М

Beauty, пожалуйста выбирай более экономные форматы. Я отредактировал (сравни: твой .bmp был 92К, этот .gif - всего лишь 1.4К).

[Lapp]

Хорошо, продвигаемся вместе..
Вот примерно так это можно сделать (с учетом функций, приведенных выше)

S:=0;
n:=1;
repeat
  a:=Power(2/n,n)*Factorial(n);
  if a>=e then S:=S+a else break;
  Inc(n)
until false;

Теперь стало понятнее?


Добавил увеличение n - забыл в первый раз, извините

Сообщение отредактировано: Lapp - 2.05.2007 4:23

[kess]

Хорошо, продвигаемся вместе..
Вот примерно так это можно сделать (с учетом функций, приведенных выше)

S:=0;
n:=1;
repeat
  a:=Power(2/n,n)*Factorial(n);
  if a>=e then S:=S+a else break
until false;

Теперь стало понятнее?

ну так