karl_karlsson
Silver Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору terminat0r Цитата: Кто говорит? Вы вольфрамовцам выслали уже? | Не знаю. Иначе, к сожалению, Владимир Бондаренко почему то не обновляет maple.bug-list.org. r_green Вот еще если написать Код: Unprotect[Sum]; Sum[Plus[a_,b_],i_]:=Sum[a,i]+Sum[b,i] Protect[Sum]; Sum[Sum[p*(-1)^(i + j + k), {i, 1, k}] + 2*r, {k, 1, j}] | то получается что надо Код: (1/4)*(-1)^j*(-1 - (-1)^j + 2*(-1)^(2*j) + 2*(-1)^(2*j)*j)*p + 2*j*r | Но если написать Код: Unprotect[Sum]; Sum[Plus[a_, b_], i_] := Sum[a, i] + Sum[b, i] Protect[Sum]; Sum[p + (-1)^(k + 1)*(1 + (-1)^k), {k, 1, j}] | то получается что то еще другое и значит еще что то не так Код: Иначе FullSimplify Код: Sum[FullSimplify[p + (-1)^(k + 1)*(1 + (-1)^k)], {k, 1, j}] | работает как надо Код: (1/2)*(1 - (-1)^j - 2*j) + j*p | Еще, если в первое выражение поменять r на е, например Код: Sum[Sum[p*(-1)^(i + j + k), {i, 1, k}] + 2*e, {k, 1, j}] | то е вообще исчезает Код: (1/4)*(1 + 4*(-1)^(2*j) + 4*j^2 + 4*p^2) | Что то на новейшего Free-Form Linguistic Input напоминает... А у Maple вот такая красота, хотя на 90% думаю оно верно, только практически использовать его затруднительно Подробнее... Добавлено: popkov А у меня вот так Ну такой вопросик - там 5.0, 5.1, 5.2, 5.3. Разница какая то имеется? У меня только 5.1 - до этого пользовался 4. |