{VERSION 5 0 "IBM INTEL NT" "5.0" } {USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 0 0 128 128 1 0 2 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 "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 }{PSTYLE "Warning" -1 7 1 {CSTYLE "" -1 -1 "Courier" 1 10 0 0 255 1 2 2 2 2 2 1 1 1 3 1 }1 1 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Maple Output" -1 11 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }3 3 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Maple Plot" -1 13 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }3 1 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "R3 Font 0 " -1 256 1 {CSTYLE "" -1 -1 "Courier" 1 11 128 0 128 1 2 1 2 2 2 2 1 1 1 1 }1 1 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "R3 Font 2" -1 257 1 {CSTYLE "" -1 -1 "Courier" 1 11 0 128 128 1 2 1 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 4 " " }}{PARA 0 "" 0 "" {TEXT -1 43 " Gerade St\374tzvektor a, Richtungsvektor u" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 57 "restart: a1:=2: a2:=0: a3:=4:\nu1:=-1: \+ u2:=2: u3:=0:\n\n\n" }{TEXT -1 50 "minimaler Abstand eines Geradenpun kts zum Ursprung" }{MPLTEXT 1 0 53 "\nf:=x->sqrt((x*u1+a1)^2 + (x*u2+a 2)^2 + (x*u3+a3)^2);" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "f1:=unapply(diff(f(x),x),x);" }}{PARA 11 "" 1 " " {XPPMATH 20 "6#>%\"fGf*6#%\"xG6\"6$%)operatorG%&arrowGF(-%%sqrtG6#,( *$),&*&9$\"\"\"%#u1GF5F5%#a1GF5\"\"#F5F5*$),&*&F4F5%#u2GF5F5%#a2GF5F8F 5F5*$),&*&F4F5%#u3GF5F5%#a3GF5F8F5F5F(F(F(" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#f1Gf*6#%\"xG6\"6$%)operatorG%&arrowGF(,$*&#\"\"\"\" \"#F/*&,(*&\"\"&F/)9$F0F/F/*&\"\"%F/F6F/!\"\"\"#?F/#F9F0,&*&\"#5F/F6F/ F/F8F9F/F/F/F(F(F(" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 12 " Extremwert:" }}{PARA 0 "" 0 "" {TEXT -1 4 " \+ " }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 173 "extr:=solve(f1(x)=0,x);\nd_min :=f(extr);\nminimalerAbstand:=evalf(d_min);\nFu\337punkt:=[d_min*u1+a1 ,d_min*u2+a2,d_min*u3+a3];\nFu\337punkt:=evalf([extr*u1+a1,extr*u2+a2, extr*u3+a3]);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%%extrG#\"\"#\"\"&" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%&d_minG,$*(\"\"%\"\"\"\"\"&!\"\"\" #I#F(\"\"#F(" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%1minimalerAbstandG$ \"+g/y\"Q%!\"*" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%)Fu|jxpunktG7%,&*( \"\"%\"\"\"\"\"&!\"\"\"#I#F)\"\"#F+F.F),$*(\"\")F)F*F+F,F-F)F(" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%)Fu|jxpunktG7%$\"+++++;!\"*$\"+++++! )!#5$\"\"%\"\"!" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 4 " " }}} {EXCHG {PARA 11 "" 1 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 0 "" }}}{EXCHG {PARA 11 "" 1 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 6 " Graph" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "plot(f(x ),x=-4..4,0..8);\n" }}{PARA 13 "" 1 "" {GLPLOT2D 418 418 418 {PLOTDATA 2 "6%-%'CURVESG6$7S7$$!\"%\"\"!$\"3w+pUhH.x5!#;7$$!3ommmmFiD Q!#<$\"3ddMNJY`T5F-7$$!35LLLo!)*Qn$F1$\"3.O9T(>d3,\"F-7$$!3nmmmwxE.NF1 $\"3/aI^;.9m(*F17$$!3YmmmOk]JLF1$\"3jZT>ONZC%*F17$$!3_LLL[9cgJF1$\"3yc &oST$z(3*F17$$!3smmmhN2-IF1$\"3y!=5b'=)*y()F17$$!3!******\\`oz$GF1$\"3 9@iP%3!*HY)F17$$!3!omm;)3DoEF1$\"3LZz7)**)oS\")F17$$!3?+++:v2*\\#F1$\" 3$[[S(z)GX#yF17$$!3BLLL8>1DBF1$\"3)[;OW#*=`](F17$$!3kmmmw))yr@F1$\"3HG MXSL$)HsF17$$!3;+++S(R#**>F1$\"3BP3x/l)o#pF17$$!30++++@)f#=F1$\"3[covv MOJmF17$$!3-+++gi,f;F1$\"3A]U?K;#fN'F17$$!3qmmm\"G&R2:F1$\"3cFRV*Q+[6' F17$$!3XLLLtK5F8F1$\"3$*p,*H#evSeF17$$!3eLLL$HsV<\"F1$\"36!)fLuky?cF17 $$!3+-++]&)4n**!#=$\"31kP#[Q\"*3Q&F17$$!37PLLL\\[%R)Faq$\"3OG/:,Zq%=&F 17$$!3G)*****\\&y!pmFaq$\"3;f\"f$zV8*)\\F17$$!3Y******\\O3E]Faq$\"3yWE qlDEC[F17$$!3NKLLL3z6LFaq$\"3%*oc)\\8qon%F17$$!3sLLL$)[`P#*=i!\\Q%F17$$\"36HLLLm&z\"\\Fa q$\"3//w?&[&e'Q%F17$$\"3>(******z-6j'Faq$\"3PlS==65@WF17$$\"3q\"****** 4#32$)Faq$\"3%z7N,dtj[%F17$$\"3r$*****\\#y'G**Faq$\"3+05J))>$zd%F17$$ \"3G******H%=H<\"F1$\"39JEW%Q4.r%F17$$\"35mmm1>qM8F1$\"3#yUj]HBZ&[F17$ $\"3%)*******HSu]\"F1$\"3(H1K>V-J.&F17$$\"3'HLL$ep'Rm\"F1$\"3Z7`XHt@9_ F17$$\"3')******R>4N=F1$\"3QJ0tw\\:JaF17$$\"3#emm;@2h*>F1$\"3ChrgPIN^c F17$$\"3]*****\\c9W;#F1$\"3W`a`?DD'*eF17$$\"3Lmmmmd'*GBF1$\"3eJ$Q:nEF1$\"3nW9CX!Q2q' F17$$\"35LLL.a#o$GF1$\"3ogLC\\1=#*pF17$$\"3ammm^Q40IF1$\"31m-aR\"4#*G( F17$$\"3y******z]rfJF1$\"3ON/q'>k$ovF17$$\"3gmmmc%GpL$F1$\"3'=4DZ>#z%* yF17$$\"3/LLL8-V&\\$F1$\"3)HN-Q=u>>)F17$$\"3=+++XhUkOF1$\"3q5b%=/fO^)F 17$$\"3=+++:o " 0 "" {MPLTEXT 1 0 2 " \n\n" }{TEXT -1 0 "" }{MPLTEXT 1 0 1 "\n" }{TEXT -1 110 "minimaler Win kel, den die Strecke [Ursprung,Geradenpunkt] mit einer Achse s (x-, y - oder z-Achse) einschlie\337t" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 0 " " }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 224 "s1:=0: s2:=0: s3:=1:\n\ng:=x-> arccos(sqrt(((x*u1+a1)*s1)^2 + ((x*u2+a2)*s2)^2 + ((x*u3+a3)*s3)^2)/\n (sqrt((x*u1+a1)^2 + (x*u2+a2)^2 + (x*u3+a3)^2)*\n sqrt( s 1^2 + s2^2 + s3^2))):\n g1:=unapply(diff(g(x),x),x):" }}} {EXCHG {PARA 11 "" 1 "" {TEXT -1 0 "" }}}{PARA 0 "" 0 "" {TEXT -1 0 " " }}{PARA 0 "" 0 "" {TEXT -1 12 " Extremwert:" }}{PARA 0 "" 0 "" {TEXT -1 4 " " }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 157 "extrems telle:=solve(g1(x)=0,x);\nw_min:=g(extremstelle);\nw_min:=evalf(w_min) ;\ngrad:=x->180*x/Pi:\nminimalerWinkel:=evalf(grad(w_min));\nplot(g(x) ,x=-4..4,0..2);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%-extremstelleG#\" \"#\"\"&" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%&w_minG-%'arccosG6#,$*& \"\"'!\"\"\"#I#\"\"\"\"\"#F." }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%&w_m inG$\"+]LM0U!#5" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%0minimalerWinkelG $\"+`U[4C!\")" }}{PARA 13 "" 1 "" {GLPLOT2D 496 496 496 {PLOTDATA 2 "6 %-%'CURVESG6$7Y7$$!\"%\"\"!$\"3kJDo\\**G!>\"!#<7$$!3ommmmFiDQF-$\"3#>> !**e!>m<\"F-7$$!35LLLo!)*Qn$F-$\"3GvG6)GiR;\"F-7$$!3nmmmwxE.NF-$\"3aL* )*zY/)[6F-7$$!3YmmmOk]JLF-$\"3\"z%[w\"[nC8\"F-7$$!3_LLL[9cgJF-$\"3dDl9 h'H]6\"F-7$$!3smmmhN2-IF-$\"3KrcK_Br(4\"F-7$$!3!******\\`oz$GF-$\"3;z& >**>0&y5F-7$$!3!omm;)3DoEF-$\"3O%)*o1-Zr0\"F-7$$!3?+++:v2*\\#F-$\"3DhW 2)*3?M5F-7$$!3BLLL8>1DBF-$\"3j%=M%Qoq35F-7$$!3kmmmw))yr@F-$\"39!)RXm!* >X)*!#=7$$!3;+++S(R#**>F-$\"3/(ehX)>#=b*F_o7$$!30++++@)f#=F-$\"3Q'z4ce kHB*F_o7$$!3-+++gi,f;F-$\"36y=;z\"**4!*)F_o7$$!3qmmm\"G&R2:F-$\"3uD!H_ Ittd)F_o7$$!3XLLLtK5F8F-$\"3aI5$fy#3k\")F_o7$$!3eLLL$HsV<\"F-$\"3u:m>> ag*y(F_o7$$!3+-++]&)4n**F_o$\"3='o!QN#)*pK(F_o7$$!37PLLL\\[%R)F_o$\"31 ]\"*z]z+'*oF_o7$$!3G)*****\\&y!pmF_o$\"3q\">bA_;fS'F_o7$$!3Y******\\O3 E]F_o$\"3usM1cpCKfF_o7$$!3NKLLL3z6LF_o$\"35@?5'z\">ZaF_o7$$!3sLLL$)[`P $\"3?uA+.\\g\"[%F_o7$$\"3yELL$=2Vs\"F_o$\"3cQJv)R6AN%F_o7$$\"3Khmm m7+#\\#F_o$\"3A()*p3u#yqUF_o7$$\"3)e*****\\`pfKF_o$\"3;%RR[va7A%F_o7$$ \"3?HL$3ngUn$F_o$\"3ZE]0w4V3UF_o7$$\"3]imm\"*f#))3%F_o$\"3![t*4mId0UF_ o7$$\"3!e***\\78R.XF_o$\"3Kwfqv:r7UF_o7$$\"36HLLLm&z\"\\F_o$\"3o5>K[.x HUF_o7$$\"3;jmm;(HXx&F_o$\"3i$=6%=zb&H%F_o7$$\"3>(******z-6j'F_o$\"3mI 467D***R%F_o7$$\"3q\"******4#32$)F_o$\"3io@Ls\"\\&*p%F_o7$$\"3r$***** \\#y'G**F_o$\"3%RXF+n@#z]F_o7$$\"3G******H%=H<\"F-$\"3kK[97rDjbF_o7$$ \"35mmm1>qM8F-$\"3K@u78\\nCgF_o7$$\"3%)*******HSu]\"F-$\"3DMOP4!)>AlF_ o7$$\"3'HLL$ep'Rm\"F-$\"3!*Qzz.&fV'pF_o7$$\"3')******R>4N=F-$\"3$[_b)y BFHuF_o7$$\"3#emm;@2h*>F-$\"3L&p!*GcUU%yF_o7$$\"3]*****\\c9W;#F-$\"3-L X\"Gdx@D)F_o7$$\"3Lmmmmd'*GBF-$\"3sKPt;^tC')F_o7$$\"3j*****\\iN7]#F-$ \"396=@.EJ()*)F_o7$$\"3aLLLt>:nEF-$\"3\")HEu#HL5J*F_o7$$\"35LLL.a#o$GF -$\"3X:o,H&=xh*F_o7$$\"3ammm^Q40IF-$\"3ki#H2N/#**)*F_o7$$\"3y******z]r fJF-$\"33NM&e0XR,\"F-7$$\"3gmmmc%GpL$F-$\"3UB&*33k[R5F-7$$\"3/LLL8-V& \\$F-$\"3'4%*z;Rv11\"F-7$$\"3=+++XhUkOF-$\"3g]wSoWp\"3\"F-7$$\"3=+++:o 6F--%'COLOURG6&%$RGBG$\"#5 !\"\"$F*F*F`]l-%+AXESLABELSG6$Q\"x6\"Q!Fe]l-%%VIEWG6$;F(Fe\\l;F`]l$\" \"#F*" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve \+ 1" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "restart;with(plots): \n " }{TEXT -1 74 "K\374rzester Weg von A(x1,y1) zu einen Punkt auf \+ der x-Achse nach B(x2,y2)" }}{PARA 7 "" 1 "" {TEXT -1 50 "Warning, th e name changecoords has been redefined\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 30 "x1:=0: y1:=4: x2:=18: y2:=8:" }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 11 "rechts:=x2:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 51 "d:=x->sqrt((x1-x)^2+(y1)^2)+ sqrt((x2-x)^2+(y2)^2);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"dGf*6#%\"xG6\"6$%)operatorG%&arr owGF(,&-%%sqrtG6#,&*$),&%#x1G\"\"\"9$!\"\"\"\"#F5F5*$)%#y1GF8F5F5F5-F. 6#,&*$),&%#x2GF5F6F7F8F5F5*$)%#y2GF8F5F5F5F(F(F(" }}}{EXCHG {PARA 11 " " 1 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "plot (d(x),x=0..rechts);" }{TEXT -1 0 "" }}{PARA 13 "" 1 "" {GLPLOT2D 496 496 496 {PLOTDATA 2 "6%-%'CURVESG6$7S7$$\"\"!F)$\"3!3Af.cr(pB!#;7$$\"3 $)******\\x[BR!#=$\"3bit$p`.fL#F,7$$\"3\"3++DY$HPtF0$\"3F$e>WnH'4BF,7$ $\"36++]-vk<6!#<$\"3?MH&Q'>^$G#F,7$$\"3-++]<06/:F;$\"3uX[=6pogAF,7$$\" 3!)***\\7uO())=F;$\"3Rxj9hE;TAF,7$$\"3)****\\i[M`C#F;$\"3ay$>Y]bcA#F,7 $$\"3x***\\izqXh#F;$\"3p0K\"))Qt>@#F,7$$\"3/++D;bV'*HF;$\"3(\\MrQt+,?# F,7$$\"3o***\\7fvqP$F;$\"3Gof0*[<.>#F,7$$\"3Y+++&p5'oPF;$\"33IIUv%\\@= #F,7$$\"3$)****\\F]Z8TF;$\"3W`KiwWPw@F,7$$\"3a+++&e5<]%F;$\"3'QLr_\"fH r@F,7$$\"3m*****\\FS:*[F;$\"3+'*ot.3cn@F,7$$\"3_+++:M@n_F;$\"3%[e(*e[I ^;#F,7$$\"3r***\\ihg$3cF;$\"3Mg4h$RLQ;#F,7$$\"33+++Nw,9gF;$\"39e+f$RJL ;#F,7$$\"33+++SBmdjF;$\"3_DJVZ@tj@F,7$$\"3))***\\i#GSdnF;$\"39;?aH_4l@ F,7$$\"3[*******)3C6rF;$\"31q02'Hpq;#F,7$$\"3%3+]iKd%*\\(F;$\"3OW70iJ. q@F,7$$\"3!4+](y68pyF;$\"3C(o?L?6O<#F,7$$\"3W,+]iq%[D)F;$\"3))*o'\\gt6 y@F,7$$\"38++D^Y04')F;$\"3o^$>%fg%H=#F,7$$\"3%*)***\\(Q:6**)F;$\"3eY/( og(*))=#F,7$$\"3')***\\i6pzQ*F;$\"3Mc:HCa!f>#F,7$$\"3j++v`9VL(*F;$\"3d ))=p\"z.F?#F,7$$\"3&****\\U-a1,\"F,$\"3@YBmVZz5AF,7$$\"3!******H\")*> \\5F,$\"3\"=F))*pb**>AF,7$$\"3'****\\sM4p3\"F,$\"3Od1bTi&)HAF,7$$\"3** **\\ig_RB6F,$\"3:@;@W,CSAF,7$$\"3%****\\nk1R;\"F,$\"3KXM!pz'y_AF,7$$\" 3()******GzI+7F,$\"3ak>'yY=]E#F,7$$\"37++]nS4,]\"F,$\"3_H_,<])oS#F,7$$\"3-++v:dGQ:F,$\"3C!Q$*H:i 6V#F,7$$\"37+]i;h9w:F,$\"3Am.c4)RoX#F,7$$\"3\"******H*e$4h\"F,$\"3M>Yj \"*4*=[#F,7$$\"3))***\\F!*33l\"F,$\"3!zE>U2>.Ou7a#F,7$$\"3()**\\i#)e\\C " 0 "" {MPLTEXT 1 0 32 "xextr:=fsolve(diff(d(x),x)=0,x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%&xextrG$\"+++++g!\"*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 45 "g1:=solve((-y1-y2)/(x1-x2)=(-y1-y)/(x1-x),y);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%#g1G,&*(\"\"#\"\"\"\"\"$!\"\"%\"xGF( F(\"\"%F*" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 12 "Schnittpunkt" }} {PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 29 "nul lstelle:=solve(g1=0. ,x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%+nulls telleG$\"\"'\"\"!" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}} {EXCHG {PARA 0 "" 0 "" {TEXT -1 60 "maximale Rechteckfl\344che unter e inem Graphen im 1. Quadranten" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 85 " \+ \n restart: f:=x->-1/6*x^2+4:\n nullstellen:=evalf(solve(f(x)=0,x)); \n\n A:=x->x*f(x);\n" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 152 "A1:=unappl y(diff(A(x),x),x);\nextr:=solve(A1(x)=0,x);\na_min:=extr[2];\na_min:=e valf(extr[2]);\n\nb_min:=evalf(f(extr));\nmaximaleFlaeche:=evalf(A(ext r[2]));\n" }}{PARA 0 "" 0 "" {TEXT -1 1 " " }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%,nullstellenG6$$!+'[z*)*[!\"*$\"+'[z*)*[F(" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"AGf*6#%\"xG6\"6$%)operatorG%&arrowGF(*&9 $\"\"\"-%\"fG6#F-F.F(F(F(" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#A1Gf*6 #%\"xG6\"6$%)operatorG%&arrowGF(,&*&#\"\"\"\"\"#F/*$)9$F0F/F/!\"\"\"\" %F/F(F(F(" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%%extrG6$,$*&\"\"#\"\"\" F(#F)F(!\"\",$*&F(F)F(F*F)" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%&a_min G,$*&\"\"#\"\"\"F'#F(F'F(" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%&a_minG $\"+CrUGG!\"*" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%&b_minG$\"+nmmmE!\" *" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%0maximaleFlaecheG$\"+IBZUv!\"* " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "plot(A(x),x=0..nullstel len[2]);" }}{PARA 13 "" 1 "" {GLPLOT2D 277 277 277 {PLOTDATA 2 "6%-%'C URVESG6$7U7$$\"\"!F)F(7$$\"3;%zc66Qy1\"!#=$\"3]K(Qq0B$pUF-7$$\"3Gn\\(> Mep*>F-$\"3Q-rDv2cuzF-7$$\"31j9=:7&=/$F-$\"3K925;&\\?@\"!#<7$$\"3U-jh; .n$4%F-$\"3*fE6ATMgi\"F:7$$\"33)olaI!\\S^F-$\"3h@Y1aobL?F:7$$\"3pa]TPk -6hF-$\"3DHS'Qgf6(F-$\"3O&40Z8Hjy#F:7$$\"3E$)p,9XEb \")F-$\"3-J*=d&pqrJF:7$$\"3#y#R6!eN7>*F-$\"3olZsbM3ZNF:7$$\"3M6D'e\"fo D5F:$\"3a4^EJ8!H#RF:7$$\"3'p(3m)4Y&>6F:$\"3[Ev`*H9VC%F:7$$\"3V.!oPV5_A \"F:$\"3i'G%p7iI%f%F:7$$\"3()*4(yO'38L\"F:$\"3+f#pu\")p>$\\F:7$$\"3xW \\\"\\\"RbL9F:$\"3egz'y30KC&F:7$$\"3(fsFFU-k_\"F:$\"3/U%H>3\")G^&F:7$$ \"3goq,z#3oj\"F:$\"3X>R7h'fj\"eF:7$$\"3F`TD@lLIjF:7$$\"3%*)z]WiMa$>F:$\"3a^Jm'37M`'F:7$$ \"35UGTbP4T?F:$\"31HL%\\\"R:ZnF:7$$\"3)[i'HMiqT@F:$\"3*yex$>U_HpF:7$$ \"3q9(p5![oYAF:$\"3'H%=GV4o'4(F:7$$\"3gd#Hh*y3VBF:$\"3<$=<:Q-%GsF:7$$ \"3iYnvd;2ZCF:$\"3YR2V%)R/YtF:7$$\"3e0R)>c\"3bDF:$\"3y>)oUP4-W(F:7$$\" 3eW#G6]/\"\\EF:$\"3-&zPe4dz\\(F:7$$\"3=?nC^=l]FF:$\"3)zSH[<'*R`(F:7$$ \"3AkWL+-cbGF:$\"3Gd_-ayUTvF:7$$\"3WA_&Hb#>eHF:$\"3%))\\D&3TH=vF:7$$\" 3)[0t8j%\\dIF:$\"3MPnLfDEmuF:7$$\"3ml^\"*eEvnJF:$\"39[P-_a7ttF:7$$\"3] Nce+W#oE$F:$\"3c#4BJ!)GmD(F:7$$\"3-6(e7j/EP$F:$\"3Y0p$elCo4(F:7$$\"3%= 5#GUsXoMF:$\"32%*Qj-\"f%>pF:7$$\"3/$*H7k%\\Kd$F:$\"3-\"Qx_Xc!*o'F:7$$ \"35dkAy2&=n$F:$\"3y:I='obkV'F:7$$\"3sE=9iv\"\\x$F:$\"3])fu?SRU8'F:7$$ \"3qK?J#=%ovQF:$\"3*)zD*Q'z++eF:7$$\"3cBf1&\\x6)RF:$\"3*3#G6\"*e\"zS&F :7$$\"3E_bU$4!y#3%F:$\"3azd_HLT))\\F:7$$\"3I4n.DMo'=%F:$\"30[EW*)Q\"e^ %F:7$$\"3CmCg%QE(*G%F:$\"3I,fR+<\\-SF:7$$\"3_1c\"G;7WQ%F:$\"3o69mb;n! \\$F:7$$\"3SbC$*\\F$H\\%F:$\"35q4%peuc&GF:7$$\"3]vItc[***e%F:$\"3%y`-j 5PHC#F:7$$\"3WK'RqI$[$p%F:$\"3)y0sl,x>a\"F:7$$\"30!oDH84Iu%F:$\"3+2Jjp q!))=\"F:7$$\"3kF<\")e\\`#z%F:$\"3nd!QlMM+C)F-7$$\"3QjeSAsvX[F:$\"3K'f 6=%yk)=%F-7$$\"3)******f[z*)*[F:$!3gMb&QK^\"pM!#E-%'COLOURG6&%$RGBG$\" #5!\"\"F(F(-%+AXESLABELSG6$Q\"x6\"Q!F\\\\l-%%VIEWG6$;F($\"+'[z*)*[!\"* %(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "C urve 1" }}}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 75 "maximaler Umfang einer Rechteckfl\344che unter einem Graphen im 1. Quadranten" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 90 " \n restart: f:=x->-1/6*x^2+4:\n nullstelle n:=evalf(solve(f(x)=0,x));\n\n U:=x->2*x+2*f(x);\n" }}{PARA 0 "> " 0 " " {MPLTEXT 1 0 115 "U1:=unapply(diff(U(x),x),x);\nextr:=solve(U1(x)=0, x);\na_min:=extr;\nb_min:=f(extr);\nmaximalerUmfang:=evalf(U(extr));\n " }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "plot(U(x),x=0..nullstellen[2]); " }}{PARA 0 "" 0 "" {TEXT -1 1 " " }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%,nullstellenG6$$!+'[z*)*[!\"*$ \"+'[z*)*[F(" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"UGf*6#%\"xG6\"6$%) operatorG%&arrowGF(,&*&\"\"#\"\"\"9$F/F/*&F.F/-%\"fG6#F0F/F/F(F(F(" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%#U1Gf*6#%\"xG6\"6$%)operatorG%&arrow GF(,&\"\"#\"\"\"*&#F-\"\"$F.9$F.!\"\"F(F(F(" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%%extrG\"\"$" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%&a_m inG\"\"$" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%&b_minG#\"\"&\"\"#" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%0maximalerUmfangG$\"#6\"\"!" }} {PARA 13 "" 1 "" {GLPLOT2D 277 277 277 {PLOTDATA 2 "6%-%'CURVESG6$7S7$ $\"\"!F)$\"\")F)7$$\"3;%zc66Qy1\"!#=$\"3;jDz%pm(4#)!#<7$$\"3Gn\\(>Mep* >F/$\"3!)[Imf))4'Q)F27$$\"31j9=:7&=/$F/$\"3sA'=.QFvd)F27$$\"3U-jh;.n$4 %F/$\"3Y3hy2O(Gw)F27$$\"33)olaI!\\S^F/$\"3l9X#e#f,S*)F27$$\"3pa]TPk-6h F/$\"3)>R?/9Bx4*F27$$\"3J3>S'Qgf6(F/$\"3+XUaOCSa#*F27$$\"3E$)p,9XEb\") F/$\"3g[9\\Q%e$4%*F27$$\"3#y#R6!eN7>*F/$\"3G6csx5lc&*F27$$\"3M6D'e\"fo D5F2$\"3$f6#RKYp+(*F27$$\"3'p(3m)4Y&>6F2$\"3,BGJ3xH@)*F27$$\"3V.!oPV5_ A\"F2$\"3c8!)>l1/]**F27$$\"3()*4(yO'38L\"F2$\"3!e&zZ/B=25!#;7$$\"3xW\\ \"\\\"RbL9F2$\"3%o0%3A#3#=5Fio7$$\"3(fsFFU-k_\"F2$\"34w&3g+F2$\"3-$RR?NBA1\"Fio7 $$\"35UGTbP4T?F2$\"3;D(p/'*\\$p5Fio7$$\"3)[i'HMiqT@F2$\"3Ed^s$RWa2\"Fi o7$$\"3q9(p5![oYAF2$\"3)3--P(Q3\"3\"Fio7$$\"3gd#Hh*y3VBF2$\"3;PHf\\bh& 3\"Fio7$$\"3iYnvd;2ZCF2$\"3kP\"y#3!4)*3\"Fio7$$\"3e0R)>c\"3bDF2$\"3k5r 6'e,M4\"Fio7$$\"3eW#G6]/\"\\EF2$\"3u%Qi\\u&*e4\"Fio7$$\"3=?nC^=l]FF2$ \"3kV/p;v#z4\"Fio7$$\"3AkWL+-cbGF2$\"3k_dZrXI*4\"Fio7$$\"3WA_&Hb#>eHF2 $\"3e'Q7ztT**4\"Fio7$$\"3)[0t8j%\\dIF2$\"3eUaC7)*))*4\"Fio7$$\"3ml^\"* eEvnJF2$\"3O'*3=o>1*4\"Fio7$$\"3]Nce+W#oE$F2$\"3GPs`4\"Fio7$$\"3%=5#GUsXoMF2$\"3o\"yrq#\\o#4\"Fio7$$ \"3/$*H7k%\\Kd$F2$\"31!4'Roh/*3\"Fio7$$\"35dkAy2&=n$F2$\"3%p@$R%)Q&\\3 \"Fio7$$\"3sE=9iv\"\\x$F2$\"3Is%HdU$)*z5Fio7$$\"3qK?J#=%ovQF2$\"3i$GG/ CRW2\"Fio7$$\"3cBf1&\\x6)RF2$\"3yQDx!p4z1\"Fio7$$\"3E_bU$4!y#3%F2$\"3! =rUcd>41\"Fio7$$\"3I4n.DMo'=%F2$\"3)[5e\\TfI0\"Fio7$$\"3CmCg%QE(*G%F2$ \"3-v'G%GNbW5Fio7$$\"3_1c\"G;7WQ%F2$\"3QS\\6KM6O5Fio7$$\"3SbC$*\\F$H\\ %F2$\"3)RIR,10d-\"Fio7$$\"3]vItc[***e%F2$\"387a=X0t:5Fio7$$\"3WK'RqI$[ $p%F2$\"32Pfi4QS/5Fio7$$\"3kF<\")e\\`#z%F2$\"3*>h7QZR*G**F27$$\"3)**** **f[z*)*[F2$\"3)[s$eq*ezz*F2-%'COLOURG6&%$RGBG$\"#5!\"\"F(F(-%+AXESLAB ELSG6$Q\"x6\"Q!Fd[l-%%VIEWG6$;F($\"+'[z*)*[!\"*%(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "28 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }