{VERSION 5 0 "IBM INTEL NT" "5.0" } {USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 1 0 0 0 0 1 }{PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }1 1 0 0 0 0 1 0 1 0 2 2 0 1 }} {SECT 0 {EXCHG {PARA 0 "" 0 "" {TEXT -1 3 "01." }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 58 "p[1]:=x+y+z-6:\np[2]:=x^2+y^2+z^2-14:\np[3]:=x ^4+y^4+z^4-98:" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 3 "02." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 29 "q[2]:=resultant(p[1],p[2],x);" }}} {EXCHG {PARA 0 "" 0 "" {TEXT -1 3 "03." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 29 "q[3]:=resultant(p[1],p[3],x);" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 3 "04." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 29 "r[3 ]:=resultant(q[2],q[3],y);" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 3 "05. " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "factor(r[3]);" }}} {EXCHG {PARA 0 "" 0 "" {TEXT -1 3 "06." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "factor(subs(z=1,q[2]));" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 3 "07." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "factor(s ubs(z=2,q[2]));" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 3 "08." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "factor(subs(z=3,q[2]));" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 3 "09." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 29 "factor(subs([y=2,z=1],p[1]));" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 3 "10." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 29 "factor(s ubs([y=3,z=1],p[1]));" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 3 "11." }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 24 "solve(\{p[1],p[2],p[3]\});" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 3 "12." }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 33 "p[1]:=x^3+y^2-2:\np[2]:=(x-y)^2-3:" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 3 "13." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 34 "f:=factor(resultant(p[1],p[2],y));" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 3 "14." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "r:=RootO f(f,x,1):" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 3 "15." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "factor(subs(x=r,p[1]));" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 3 "16." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 57 "alias(alpha=RootOf(f,x,1)):\nfactor(subs(x=r,p[1]),alpha);" }}} {EXCHG {PARA 0 "" 0 "" {TEXT -1 3 "17." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 29 "factor(subs(x=r,p[2]),alpha);" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 3 "18." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "sol ve(\{p[1],p[2]\},\{x,y\});" }}}}{MARK "1 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }