Ещё можно попробовать решить в косинусах, как расписано тут:
http://community.livejournal.com/ru_math/62661.htmlРешите пожалуйста уравнение, если известно
что его корни выражаются через квадратные радикалы:
Аналогичным образом этот многочлен раскладывается на квадратные множители с "косинусоидальными" коэффициентами:
Код:
> alias(alpha=RootOf(cyclotomic(17,z))): simplify( subs(alpha=exp(2*Pi*I/17),factors(x^16 -x^15 - 16*x^14 +16*x^13 +103*x^12 -103*x^11 -339*x^10 +339*x^9+596*x^8-596*x^7-526*x^6+526*x^5+188*x^4-188*x^3-16*x^2+16*x+1,alpha)) );
[1, [
[-2*x*cos(7/17*Pi)-2*cos(3/17*Pi)+x^2-1, 1],
[-2*cos(7/17*Pi)-2*x*cos(5/17*Pi)+x^2-1, 1],
[2*x*cos(6/17*Pi)-2*cos(5/17*Pi)+x^2-1, 1],
[2*x*cos(8/17*Pi)-2*cos(1/17*Pi)+x^2-1, 1],
[2*cos(6/17*Pi)-2*x*cos(3/17*Pi)+x^2-1, 1],
[-2*cos(4/17*Pi)-2*cos(6/17*Pi)-2*cos(8/17*Pi)+2*cos(7/17*Pi)+2*cos(5/17*Pi)+2*cos(3/17*Pi)+2*cos(1/17*Pi)-2*cos(1/17*Pi)*x+x^2-2, 1],
[-2*x*cos(4/17*Pi)+2*cos(4/17*Pi)-2*x*cos(6/17*Pi)-2*x*cos(8/17*Pi)+2*x*cos(7/17*Pi)+2*x*cos(5/17*Pi)+2*x*cos(3/17*Pi)+2*cos(1/17*Pi)*x+x^2-x-1, 1],
[2*x*cos(4/17*Pi)+2*cos(8/17*Pi)+x^2-1, 1]
]]
За разложение большое Вам спасибо. Однако это совсем еще извините не ответ. Во первых можно было просто написать:
Во вторых, после решения квадратного уравнения, подставляя нужные значения:
Возникнет проблема упрощения выражения под корнем. Оное будет нечитабельно. Поэтому и предлагаю найти выражение пусть одного корня, от одного всем известного по Викки значения:
Сможет ли компьютер и программы имеющиеся в Вашем распоряжении решить такую «легкую» задачку?