Инструкция 9 шагов, выполняемых по порядку в одной сессии. Каждый шаг был выполнен на движке, и вывод ниже — то, что он дал.
p = x ^ 2 E ^ (2x) + 2x E ^ (2x) + x E ^ xE^x*x + 2*E^(2*x)*x + E^(2*x)*x^2Collect[p, x]E^x + 2*E^(2*x) + E^(2*x)*xCollect[p, E ^ _]Collect[E^x*x + 2*E^(2*x)*x + E^(2*x)*x^2, E^(_)]Collect[p, E ^ _, Simplify]Collect[E^x*x + 2*E^(2*x)*x + E^(2*x)*x^2, E^(_), Simplify]poly = x ^ 2 - 3x + 22 - 3*x + x^2Coefficient[poly, x, 0]2poly /. x -> 02MonomialList[poly, x]{x^2, -3*x, 2}poly//TraditionalFormTraditionalForm[2 - 3*x + x^2]Все рецепты · Справочник функций · Использовать из MCP-клиента