Задача с факториалами, как это решается ??? Опции

[Art87]

Здравствуйте уважаемые программисты. Помогите начинающему с задачей пожалуйста

Вычислить сумму бесконечно сходящегося ряда

Я присоединил в виде картинки...

Сообщение отредактировано: volvo - 23.04.2005 17:07

[volvo]

В следующий раз пользуйся поиском, я уже решал подобные задачи на форуме... :yes:

var
  x, next, s: real;
  i: integer;
  is_minus: boolean;

begin
  x := 0.5; { здесь - ввод X с клавиатуры }
  { и проверка на попадание в заданный интервал }

  s := 1; i := 1; next := 1;
  is_minus := true;
  repeat
    next := next * ( (2 * sqr(i) + 1) / ((2*i - 1)*(2*i)) ) * sqr(x);
    s := s + (1 - 2 * byte(is_minus)) * next;
    is_minus := not is_minus; inc(i)
  until next <= 0.00001; { здесь введешь необходимую точность }

  writeln('s = ', s:10:7)
end.

[Art87]

Спасибо огромное!!!

[Art87]

Извините, можно еще один вопрос?
А как указывать точность, когда делаешь через for и while?

[volvo]

А как указывать точность, когда делаешь через for и while?

А как, собственно, это сделать через for ? Что должно быть параметром цикла? Если i, то не пойдет, мы не знаем сколько итераций потребуется... Вещественное число тоже не пойдет, параметр для for должен быть перечислимого типа... Так что с for проблемы... А while...

while next > 0.00001 do begin
  { здесь то же самое что и в REPEAT .. UNTIL }
end;

[Art87]

А мою задачу тоже через for нельзя сделать?

[klem4]

цикл for употребляется только в том случае, когда известно, сколько итераций будет произведено, ты при любой точности можешь высчитать кол-во итераций ??))))

в общем ответ - нет.

Сообщение отредактировано: klem4 - 26.04.2005 18:49

[FreeMan]

цикл for употребляется только в том случае, когда известно, сколько итераций будет произведено, ты при любой точности можешь высчитать кол-во итераций ??))))

можно. потрясный эффект даёт dec(счётчик) в теле цикла

[Altair]

с точки зрения сруктурного программирования, нельзя изменять счетчик внутри цикла. Паскаль это делать позволяет а вот насчет других не уверен...
Так что лучше этого не делать нигде!