{VERSION 6 0 "IBM INTEL LINUX" "6.0" } {USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 1 0 0 0 0 1 }{CSTYLE "2D Math" -1 2 "Times" 0 1 0 0 0 0 0 0 2 0 0 0 0 0 0 1 }{CSTYLE "2D Output" 2 20 "" 0 1 0 0 255 1 0 0 0 0 0 0 0 0 0 1 } {PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Maple Output" 0 11 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 }3 3 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }} {SECT 0 {EXCHG {PARA 0 "" 0 "" {TEXT -1 24 "Kompleks 2. gradsligning" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 5 "a:=1;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"aG\"\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 7 "b:=1+I;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"bG^$\"\"\"F&" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 5 "c:=I;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"cG^#\"\"\"" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 16 " Ligningen er nu:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "a*z^2 + b*z + c = 0;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#/,(*$)%\"zG\"\"#\"\" \"F)*&^$F)F)F)F'F)F)^#F)F)\"\"!" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 71 "Diskrimintant. Kvadratroden er den principale kvadratrod, se Adams A-8." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "d:=b^2-4*a*c;" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"dG^#!\"#" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "sqrt(d);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#^$\" \"\"!\"\"" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 10 "L\370sninger:" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "z1:=(b+sqrt(d))/(2*a);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%#z1G\"\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "z2:=(b-sqrt(d))/(2*a);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#z2G^#\"\"\"" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 14 " P\345 pol\346r form:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "con vert(z1,polar);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%&polarG6$\"\"\"\" \"!" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "convert(z2,polar);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%&polarG6$\"\"\",$*&\"\"#!\"\"%#PiG F&F&" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 7 "Kontrol" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "solve(a*z^2+b*z+c);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$^#!\"\"F$" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 " " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "6 0 0" 66 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }