| Главная » Статьи » Задачи из заказов » Заказ 07.01.07 Pascal |
Вычислить для n слагаемое 1-5-13-29+61-125+:.+(-1)^k-1(2^k-1-3)+:..
| { ----------------------------------------------------------------------- 3. Вычислить для n слагаемое 1-5-13-29+61-125+:.+(-1)^k-1(2^k-1-3)+:.. Комментарий: математически ряд задан не правильно. При судя по формуле первый член должен быть -2, второй -1, а уж только 3-й 1. Тоесть первые два члена откинули. Значит ряд мы сможем посчитать только для n>2. Да, и перед 13 должен быть наверно знак "+". И вообще в теории рядов знак "..." означает сумму бесконечного ряда, а она существует только для с ходящихся рядов, чем этот ряд не является. У него можно найти тока частичную сумму первых n слагаемых - что от тебя и должны были требывать. ----------------------------------------------------------------------- } var n, k : longint; sum: real; begin repeat writeln('Задайте n>2:'); readln(n); if (n<=2) then writeln('n введено некорректно!'); until (n>2); sum := 0; for k:=3 to n do if odd(k-1) then sum := sum - (exp((k-1)*ln(2)) - 3) else sum := sum + (exp((k-1)*ln(2)) - 3); writeln('Искомая сумма равна ', sum:0:0); end. | |
| Категория: Заказ 07.01.07 Pascal | Добавил: solver (07.01.2007) | |
| Просмотров: 1051 |