{VERSION 4 0 "IBM INTEL NT" "4.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 "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 "Heading 1" -1 3 1 
{CSTYLE "" -1 -1 "Times" 1 18 0 0 0 1 2 1 2 2 2 2 1 1 1 1 }1 1 0 0 8 
4 1 0 1 0 2 2 0 1 }{PSTYLE "Maple Output" -1 11 1 {CSTYLE "" -1 -1 "Ti
mes" 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 "Title" 0 18 
1 {CSTYLE "" -1 -1 "" 1 18 0 0 0 0 0 1 1 0 0 0 0 0 0 0 }3 0 0 -1 12 
12 0 0 0 0 0 0 19 0 }}
{SECT 0 {EXCHG {PARA 18 "" 0 "" {TEXT -1 25 "TD 10 : s\351ries de Four
ier" }}}{SECT 0 {PARA 3 "" 0 "" {TEXT -1 17 "S\351ries de Fourier" }}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "restart;" }}}{EXCHG {PARA 0 "
> " 0 "" {MPLTEXT 1 0 175 "g:=x->2*x^2-x^5:\nalpha:=-1: beta:=1: T:=be
ta-alpha: omega:=2*Pi/T:\nf:=x-> if x<alpha then f(x+T); elif x<beta t
hen g(x); else f(x-T); fi:\nplot(f, 2*alpha-beta..2*beta-alpha):\n" }}
}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 236 "assume(n, integer);\na:=n-
>2/T*int(g(x)*cos(n*omega*x), x=alpha..beta):\n'a(n)'=simplify(a(n));
\nb:=n->2/T*int(g(x)*sin(n*omega*x), x=alpha..beta):\n'b(n)'=simplify(
b(n));\nS:=n->a(0)/2+sum('a(k)*cos(k*omega*x)+b(k)*sin(k*omega*x)', k=
1..n):" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#/-%\"aG6#%\"nG,$*&)!\"\"%#n|
irG\"\"\"*&)F,\"\"#F-)%#PiGF0F-F+\"\")" }}{PARA 11 "" 1 "" {XPPMATH 
20 "6#/-%\"bG6#%\"nG,$*&*&)!\"\"%#n|irG\"\"\",(*&)F-\"\"%F.)%#PiGF2F.F
.*(\"#?F.)F-\"\"#F.)F4F8F.F,\"$?\"F.F.F.*&)F-\"\"&F.)F4F=F.F,F8" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 52 "plot([S(10), 'f(x)'], x=2*al
pha-beta..2*beta-alpha):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 82 
"exprs:=eval(seq('S'(20*k), k=1..5)):\nplot([exprs, 'f'(x)], x=beta-0.
1..beta+0.1);\n" }}{PARA 13 "" 1 "" {GLPLOT2D 1202 613 613 {PLOTDATA 
2 "6*-%'CURVESG6$7Z7$$\"3A+++++++!*!#=$\"3aNmFq3yC6!#<7$$\"3nLLL3VfV!*
F*$\"3_N%GOja[7\"F-7$$\"3%pm;H[D:3*F*$\"3*3bOmAW\"=6F-7$$\"3nLL$e0$=C
\"*F*$\"3sK_z!\\5I5\"F-7$$\"3%QLL3RBr;*F*$\"3!4?Ej6_,3\"F-7$$\"3Smm\"z
jf)4#*F*$\"3AVx.pJ*30\"F-7$$\"3?LLe4;[\\#*F*$\"3lq;@wpS>5F-7$$\"3o++Dm
y]!H*F*$\"3KPt))fqsU)*F*7$$\"3>LLezs$HL*F*$\"3_+AX\"\\UkZ*F*7$$\"3G++D
@1Bv$*F*$\"3G]p/\")RXO\"*F*7$$\"3Onmm@Xt=%*F*$\"3*f#>H7()oW))F*7$$\"3y
LL$3y_qX*F*$\"3ETO^a2ai')F*7$$\"3amm\"HU@'y%*F*$\"3#fA3c\\a&*f)F*7$$\"
3T+++l+>+&*F*$\"3GFd2pNqp&)F*7$$\"3?,++qs%=_*F*$\"3'[`rGu7ld)F*7$$\"3)
3++]Z/Na*F*$\"3X;J#[WOLi)F*7$$\"3#3++]?vVc*F*$\"36`RZ0C&*3()F*7$$\"3w+
++NfC&e*F*$\"3&ya`/x6l$))F*7$$\"3bLLez6:B'*F*$\"35@7j#[55=*F*7$$\"3)pm
m;=C#o'*F*$\"3I_>\"z))[xy*F*7$$\"3\\nmmEpS1(*F*$\"3#*H'36aUr/\"F-7$$\"
31++DOD#3v*F*$\"3')z\">&H_qX6F-7$$\"3!pmmm(y8!z*F*$\"3)**o8\"RS&)[7F-7
$$\"3$4+]i.tK$)*F*$\"37pk@nK8x8F-7$$\"3!3+](3zMu)*F*$\"36-,V9'e8^\"F-7
$$\"3\"zmm\"H_?<**F*$\"3-R2xQGdg;F-7$$\"3)om;zihl&**F*$\"32!o*=oq[-=F-
7$$\"3)RLL3#G,****F*$\"3I\"3N5u$*o&>F-7$$\"3TL$ezw5V+\"F-$\"3!*o_MV$zU
6#F-7$$\"3:+]PQ#\\\"35F-$\"3OA@+f%z^C#F-7$$\"3TLLe\"*[H75F-$\"3Y9vp\\R
kwBF-7$$\"33+++dxd;5F-$\"3=-$)>7UC)\\#F-7$$\"3;++D0xw?5F-$\"3WZ!\\g#fK
+EF-7$$\"3.+]i&p@[-\"F-$\"3!)*)=+Xv6\"o#F-7$$\"32++vgHKH5F-$\"3)p'G*R<
0&[FF-7$$\"3XL$3UDX8.\"F-$\"3oj*yIn**3x#F-7$$\"3$ommwanL.\"F-$\"35r`aQ
fQ)y#F-7$$\"3XLLexn_N5F-$\"337lEy\\o,GF-7$$\"31++]2goP5F-$\"35D:;-x`4G
F-7$$\"3lm\"H2fU'R5F-$\"31\")48[!y?\"GF-7$$\"3YL$eR<*fT5F-$\"3S(47UdA/
\"GF-7$$\"3tm\"HiBQP/\"F-$\"3%pwBLAES!GF-7$$\"3+++])Hxe/\"F-$\"3c]kJdz
5$z#F-7$$\"3mm;H!o-*\\5F-$\"3K&4a/RA9w#F-7$$\"3/+]7k.6a5F-$\"3^s+fsB(
\\r#F-7$$\"3mmm;WTAe5F-$\"3EKW%>6h#fEF-7$$\"3;+]i!*3`i5F-$\"3E>J!G#3K$
f#F-7$$\"3KLLL*zym1\"F-$\"3un2mEOjDDF-7$$\"3MLL3N1#42\"F-$\"3U;1C$Q(Hb
CF-7$$\"3%om\"HYt7v5F-$\"3a8[`o1C(Q#F-7$$\"37+++xG**y5F-$\"3w#R[\"4'p#
GBF-7$$\"3'om;9@BM3\"F-$\"31VtU\"[foE#F-7$$\"3[LLLbdQ(3\"F-$\"3$foi%Q7
y=AF-7$$\"33+]i`1h\"4\"F-$\"3K^!\\Y\\Ha<#F-7$$\"3/+]P?Wl&4\"F-$\"3Jn!e
K-$zT@F-7$$\"33+++++++6F-$\"3hlS#e,'*Q6#F--%'COLOURG6&%$RGBG$\"#5!\"\"
$\"\"!Fc]lFb]l-F$6$7cp7$F($\"3SL6&z40\"z5F-7$F/$\"3c62$*[g6w5F-7$F4$\"
3%p8'eQW>h5F-7$F9$\"3GW8yN%zV.\"F-7$F>$\"30'o*GP+(Q+\"F-7$FC$\"33Q%>'3
y5\"z*F*7$$\"3D***\\Piq'H#*F*$\"3&>#))y].\\>(*F*7$FH$\"3m#Qp'3/g%o*F*7
$$\"3%pm;zt%**p#*F*$\"3W^&Q)z%R<p*F*7$FM$\"3wC&y@K/\\u*F*7$$\"3]nm\"Hd
A<J*F*$\"3#f,?I*\\@Z)*F*7$FR$\"3a&>;*f6-$***F*7$FW$\"3OG'[ZY-y.\"F-7$F
fn$\"3qMxmG,Q\"3\"F-7$$\"3,++D^O*yV*F*$\"37nIwl3T)4\"F-7$F[o$\"3*)>Ii4
MU76F-7$F`o$\"3En`(GYGK7\"F-7$Feo$\"3\"z%454D^F6F-7$$\"3!3++vm=5^*F*$
\"3\"RxG'*3!*o7\"F-7$Fjo$\"3/2#)>(4,V7\"F-7$$\"3[++]senK&*F*$\"3-)>W&y
0q>6F-7$F_p$\"3n-M<(4yI6\"F-7$Fdp$\"3_9gu(>PZ4\"F-7$Fip$\"3uMQm!H\"fp5
F-7$F^q$\"3*>C3M'eV55F-7$Fcq$\"36&y#GXni5$*F*7$$\"3omm;abJ(o*F*$\"3N^A
&o#GN,!*F*7$Fhq$\"3ubDg$)3NR()F*7$$\"3>,D1H3^<(*F*$\"3n51Pi2[<')F*7$$
\"3yL$e9t9'G(*F*$\"3MzZA,?PB&)F*7$$\"3OmT&Qj=(R(*F*$\"31*R'yW&e6Y)F*7$
F]r$\"38U)*)e&=xM%)F*7$$\"3gnTNr8lg(*F*$\"3Yq&zREeUW)F*7$$\"3/M$ek?![q
(*F*$\"3)HQ_SmKq[)F*7$$\"3[+DcT!4.y*F*$\"3al#[v`1_c)F*7$Fbr$\"3me6ARxj
!o)F*7$$\"3#RLekX0<\")*F*$\"3iC\"zg*)*zr!*F*7$Fgr$\"3iI-)*[]!4m*F*7$$
\"3'3++DZ5Q&)*F*$\"3GCF&RX@4/\"F-7$F\\s$\"3Y;=`<bjL6F-7$$\"3MM$e*olx&*
)*F*$\"3]q:2U2D[7F-7$Fas$\"3=5z)3jH\"z8F-7$$\"3Sn;aGM)o$**F*$\"379]]8)
38^\"F-7$Ffs$\"3uf!RB)=K_;F-7$$\"3)4+vVA(yx**F*$\"3)4xS]Z`4\"=F-7$F[t$
\"33O:bFIZs>F-7$$\"3NL3-Dg5-5F-$\"3J&)4ok3()Q@F-7$F`t$\"3)=s\\\"pnK*H#
F-7$$\"3*ommJ+Ii+\"F-$\"38a^))))owICF-7$Fet$\"3%[kSiC+=b#F-7$$\"3nm\"z
\\1A-,\"F-$\"331&>e_V#oEF-7$Fjt$\"3W\"yE.Y^ww#F-7$$\"3vm;HCjV95F-$\"3K
#RFk,\\2&GF-7$F_u$\"3Y5imi3'H\"HF-7$$\"37+]7JFn=5F-$\"3'38,D\"GY`HF-7$
Fdu$\"3c?g(pxQW(HF-7$$\"3Avo/aWF@5F-$\"3_&))p(=@rwHF-7$$\"32]P%G?\"y@5
F-$\"35S3V,.%z(HF-7$$\"39D1k^zGA5F-$\"3eU#***f$\\\"yHF-7$$\"3?+vV+ZzA5
F-$\"3GP$>KBnt(HF-7$$\"37]7.)>3Q-\"F-$\"35*[_z6]H(HF-7$Fiu$\"3%Qke;zY
\\'HF-7$$\"30+v=GB2F5F-$\"3FUQIq\")zNHF-7$F^v$\"3W#Q?w'))y$*GF-7$Fhv$
\"31;3$fv[xz#F-7$Fbw$\"3)yZs$e&\\lo#F-7$F\\x$\"3ss]EOyC'f#F-7$Ffx$\"3A
iIC(*e\\ADF-7$$\"3MLeR*)**)y/\"F-$\"3S$\\F7F?()\\#F-7$F[y$\"3%\\4KBtw>
[#F-7$$\"3YL$3A_1?0\"F-$\"3ml!o'zuWrCF-7$F`y$\"3Q#=yte%3nCF-7$$\"3MLe9
as;c5F-$\"3YvS1HBanCF-7$Fey$\"3yb2qd8DrCF-7$Fjy$\"33>DNP*yG[#F-7$$\"3u
m\"z\\%[gk5F-$\"3kv/N3>A([#F-7$F_z$\"3kh@P9?(*)[#F-7$$\"3WL$3sr*zo5F-$
\"3!*=&ok(\\.([#F-7$Fdz$\"3i'[`Mb)e![#F-7$$\"35+vo!*R-t5F-$\"3Ui\"3BFe
$pCF-7$Fiz$\"3WQ!=3/&G`CF-7$F^[l$\"3H(yfOneBT#F-7$Fc[l$\"3SR:uhya_BF-7
$Fh[l$\"3!*4&G**4c\\H#F-7$F]\\l$\"3;?QYO2!yB#F-7$Fb\\l$\"35%zFxaBN>#F-
7$Fg\\l$\"3-u]g?t\"4;#F--F\\]l6&F^]lFb]lF_]lFb]l-F$6$7^r7$F($\"3]+8pl8
%G1\"F-7$$\"3Rmm;arz@!*F*$\"37i\"yhn6D1\"F-7$F/$\"3w5?/\\DYc5F-7$$\"3w
**\\i&*)fD1*F*$\"3YU&QOP>s/\"F-7$F4$\"3aa7[2-WN5F-7$F9$\"3Z3,#=SZx+\"F
-7$$\"3IMLLBKlX\"*F*$\"3_z'o*pPUy**F*7$F>$\"3I4+`)4*GL**F*7$$\"37+]P9:
\\)=*F*$\"3qSgJ+ax_**F*7$FC$\"3)[gJ/Q9P+\"F-7$Fj^l$\"3([))H3rgk,\"F-7$
FH$\"3ye&)HFLNK5F-7$FM$\"37q-(e.&*e1\"F-7$Fj_l$\"33.m@0x9y5F-7$FR$\"3-
$HsQmYP3\"F-7$$\"3C+++:1^V$*F*$\"3iel)y*>e$3\"F-7$$\"3InmT]R3a$*F*$\"3
U!>`9kW83\"F-7$$\"3CLL$eGdYO*F*$\"3#[7PO)\\0x5F-7$FW$\"3il2R*Q;32\"F-7
$$\"3OM$e9d#)pR*F*$\"3KX)o,?EF0\"F-7$Ffn$\"3#3BG*HU$)H5F-7$F[o$\"3gB&y
mYj0*)*F*7$F`o$\"3wwcZ\")>2F(*F*7$Feo$\"3qW'4bkpMl*F*7$Ffal$\"33CS*[xN
sl*F*7$Fjo$\"3_hM$3Ec)*o*F*7$F^bl$\"3i(=B6f36v*F*7$F_p$\"3>lY*>#paR)*F
*7$Fdp$\"3]n&)[Y[e25F-7$Fip$\"3f4sZ(oXr.\"F-7$$\"3sn;Hd&)>/'*F*$\"3%HB
`;'4]l5F-7$F^q$\"3iyVk=?R\"4\"F-7$$\"3NmT5I%>Wj*F*$\"3)QODA)p-/6F-7$$
\"3E+]i!o(oX'*F*$\"3f!Gt'HQm86F-7$$\"3=Me9Jf&pl*F*$\"3'[dv\"o:j>6F-7$F
cq$\"3B#eGJ)*z87\"F-7$$\"3#om;z')pxn*F*$\"3w@xFH$f#>6F-7$Fbcl$\"37D2++
\"zO6\"F-7$$\"3knmTS7'op*F*$\"3@a>:!=)f/6F-7$Fhq$\"3)GX)*3E%3#4\"F-7$F
_dl$\"3G83*\\d440\"F-7$F]r$\"3=$p>E]y,(**F*7$Fbr$\"3#\\H$4P\"Rp&*)F*7$
$\"3(4]ilm@4!)*F*$\"3\"4t51^#GG()F*7$F^fl$\"3)\\Efz09da)F*7$$\"3%)\\iS
^t4<)*F*$\"3)eVSdD_eZ)F*7$$\"3(o;ajC*[A)*F*$\"3z4Z+MjTA%)F*7$$\"3!R3-8
9\")y#)*F*$\"3?s%>i.`pQ)F*7$Fgr$\"3OvXf/_%4P)F*7$$\"3k+DJ&R2%Q)*F*$\"3
)[7g$=O2v$)F*7$$\"3M+]Pa<aV)*F*$\"3#)*3I+9h#*R)F*7$$\"31+vV8hn[)*F*$\"
3#>brDboXW)F*7$Fffl$\"3\">uj'px'>^)F*7$$\"3Q,]i!>zS')*F*$\"3aMI4c(Qkr)
F*7$F\\s$\"3?1pAu-R=!*F*7$F^gl$\"3WkC4G1)p(**F*7$Fas$\"3#3VR#f$[!Q6F-7
$Ffgl$\"3tmK)p\"yA.8F-7$Ffs$\"3)pjy`!=X(\\\"F-7$$\"3%R$e9EW<n**F*$\"34
3u]zJ_6;F-7$F^hl$\"3!4I\")[0]-t\"F-7$$\"3#p;/E-+%))**F*$\"3u_e'oP??&=F
-7$F[t$\"3wSh2mC9v>F-7$$\"3V$3_Nl.5+\"F-$\"3r)HW9;2E5#F-7$Ffhl$\"3\"\\
iPb.HxA#F-7$$\"3F$e*['R3K+\"F-$\"3IU&f\"*\\G'[BF-7$F`t$\"3iWLYt)HNY#F-
7$F^il$\"3$H(=VE)GXk#F-7$Fet$\"3Yb6#\\*HT&z#F-7$Ffil$\"3`:K$4E;!>HF-7$
Fjt$\"3q]#zWq]\"**HF-7$$\"3>+v$zglL,\"F-$\"3$RDH]#HmBIF-7$F^jl$\"3<L$>
t]Hs.$F-7$$\"3.](oCor\\,\"F-$\"3M.`bE$=,/$F-7$$\"3ILekSq]:5F-$\"3Wo\")
4E#[0/$F-7$$\"3e;H#))RUg,\"F-$\"3u!G8d`O'QIF-7$F_u$\"38nkYS3^MIF-7$Ffj
l$\"3%)3Zl5,y**HF-7$Fdu$\"3(HoTr*)GD%HF-7$Fiu$\"3Zn8\\10j/GF-7$F^v$\"3
9!H$yKidtEF-7$Fcv$\"3\\mIHwy]OEF-7$Fhv$\"3d'yIXRe_h#F-7$$\"3D+]iirWM5F
-$\"3L#eO>gU+h#F-7$F]w$\"3CupqS(3'3EF-7$$\"3km;a#R1m.\"F-$\"3T0#eb]H/h
#F-7$Fbw$\"3k$R->+$)[h#F-7$Fgw$\"3ZBZH$**4ui#F-7$F\\x$\"3yt!)G*)f*>k#F
-7$Fax$\"3c_SF%R@al#F-7$Ffx$\"3s:m#=@d=m#F-7$$\"3c;z%Rk$)o/\"F-$\"3!yj
W[XU:m#F-7$F^^m$\"3]-dgr(3)eEF-7$$\"37]P%[L'*)[5F-$\"31/1=*HqNl#F-7$F[
y$\"3)oy%R&zKek#F-7$Ff^m$\"3H)Qu@*H4AEF-7$F`y$\"3-')pG#zm)*e#F-7$Fey$
\"3GCQ!Gd1X^#F-7$Fjy$\"3G)>))H3sDW#F-7$Fi_m$\"3M@x+<lb<CF-7$F_z$\"31pL
YgV\\+CF-7$Fa`m$\"3#4x9(f5)4R#F-7$Fdz$\"3C*4Z%3)=!)Q#F-7$Fi`m$\"3=t<0D
b?*Q#F-7$Fiz$\"3Urq\\A3p\"R#F-7$$\"3QLek6,1x5F-$\"37\"*R=Rto#R#F-7$F^[
l$\"3Ccl([vy/R#F-7$$\"3gL$3U/373\"F-$\"3!e7!\\91C#Q#F-7$Fc[l$\"3#*)*=x
'H!)pO#F-7$$\"31+]P$[/a3\"F-$\"3UJB\"fdevM#F-7$Fh[l$\"3)=fPLplOK#F-7$F
]\\l$\"3Ur>VVpHlAF-7$Fb\\l$\"3rWqj%*=#Q@#F-7$Fg\\l$\"3Mn()=0_Bx@F--F\\
]l6&F^]lF_]lF_]lFb]l-F$6$7^t7$F($\"3kK%*oImda5F-7$F[cm$\"3Y)RxV4tL0\"F
-7$F/$\"3sO_Vzq)\\/\"F-7$Fccm$\"3s@i76DnL5F-7$F4$\"3U1vUy$)G@5F-7$$\"3
J+]PpU&G5*F*$\"3\\k3ddLq45F-7$F9$\"3NQ@N,>1/5F-7$F^dm$\"3TosF[KY15F-7$
F>$\"3COeA]0y;5F-7$Ffdm$\"3&zY^P`%RK5F-7$FC$\"3QpnY<18\\5F-7$Fj^l$\"3y
d!o6%*z91\"F-7$FH$\"3%e(\\prPWn5F-7$$\"3k++vt\"Q(f#*F*$\"33U7'3S\\t1\"
F-7$Fb_l$\"3'3fBH\"3(\\1\"F-7$$\"3ELL3-8D!G*F*$\"3[7/(Q!pSg5F-7$FM$\"3
ED,xVf!R0\"F-7$Fj_l$\"3@\"*ek'3-h.\"F-7$FR$\"3**\\D'*Qs`;5F-7$Fbfm$\"3
aTP7)Q'y+5F-7$FW$\"3p.P3*\\%QN**F*7$$\"3ymTN'f1hQ*F*$\"3L1z8Q3\"4%**F*
7$F_gm$\"3ozI74<\"p(**F*7$$\"3(3]ilaeyS*F*$\"3\"4tJn.jT+\"F-7$Ffn$\"3j
\"yS!za585F-7$Fh`l$\"3asE\"HrDH.\"F-7$F[o$\"3)Gy**y8RS0\"F-7$$\"3s+](=
5PyY*F*$\"3s,K08Tfk5F-7$F`o$\"3)*oI8,D4t5F-7$$\"3YL$eRu0%*[*F*$\"3W#Gl
\"\\&)yy5F-7$Feo$\"3'o%>@!3863\"F-7$Ffal$\"3!>CvJH4(z5F-7$Fjo$\"3oU\\J
]wZu5F-7$F^bl$\"3M1I<z%=c1\"F-7$F_p$\"3wZ0=dIh`5F-7$Fdp$\"3dI**[g[^C5F
-7$Fip$\"3E!oB3>(4R**F*7$$\"3yMe9YAs%f*F*$\"3wz\\?,o%z\")*F*7$Fbim$\"3
ZgR9ANo=(*F*7$$\"3j+vVo[n8'*F*$\"3IRd+6i&zk*F*7$F^q$\"3h'G\"y?U46'*F*7
$$\"3&*\\P%[I&yG'*F*$\"3nWq\")z[!og*F*7$Fjim$\"3nM-!H?dih*F*7$$\"3v#ek
`b`+k*F*$\"3A%))>CYJ'R'*F*7$F_jm$\"3Qpnx=G$on*F*7$Fdjm$\"3qfK?Lv#4z*F*
7$Fcq$\"3/C>!yXg@&**F*7$Fbcl$\"32/H]BH6I5F-7$Fhq$\"3W]@X(>&*y1\"F-7$Fj
cl$\"3O>/U(o>w3\"F-7$F_dl$\"3gt::g7U.6F-7$$\"32]il#omTt*F*$\"3>t!Q'>*>
$46F-7$Fddl$\"3%f!yWyBj86F-7$$\"3w$3_]eq_u*F*$\"3w)>:\">s>;6F-7$F]r$\"
3\\f!R)Q%zo6\"F-7$$\"3G$3-Q&ptb(*F*$\"3BP=([_Fe6\"F-7$F\\el$\"3Jh'4&fk
;86F-7$$\"3#3D1*)ylbw*F*$\"3?>&Q.zm)36F-7$Fael$\"3fN)3[<AH5\"F-7$Ffel$
\"3IKg(=/%>'3\"F-7$Fbr$\"3CCz_CZUj5F-7$F^fl$\"3S(\\^iOM,(**F*7$Fgr$\"3
wt%f*)R4V@*F*7$Fd^n$\"3A@]o.tK%)))F*7$Fffl$\"3T-V]b)*))4')F*7$$\"3o,Dc
J[%*e)*F*$\"33xCmhH/-&)F*7$Fa_n$\"3-O#ep8f#=%)F*7$$\"35,vo\\N@p)*F*$\"
3#3sBE$>yh$)F*7$F\\s$\"3Vl(Q^*=rN$)F*7$$\"3=%3-Q20(z)*F*$\"3Jy-[(pySM)
F*7$$\"3enT&)QA1&))*F*$\"37Crn#4\"y\"R)F*7$$\"3'4D1RS>/*)*F*$\"3QcTH8)
p:[)F*7$F^gl$\"3*p.d'4u%eh)F*7$$\"38,D1**3\\1**F*$\"31igr+a^D!*F*7$Fas
$\"3k8D*)zLrJ'*F*7$$\"3mnT&)GV/F**F*$\"3%p!*oG%oXO5F-7$Ffgl$\"3>&G:dB'
GE6F-7$$\"39n\"H#GDsY**F*$\"3T#>')4Oe<B\"F-7$Ffs$\"33u9hjdT^8F-7$Fe`n$
\"350%)R&e0T\\\"F-7$F^hl$\"3S(z]6`Rzk\"F-7$F]an$\"3qQZ#=6t$4=F-7$F[t$
\"3q2i35M_u>F-7$Fean$\"3y%[yc(HlX@F-7$Ffhl$\"39()**3([v=J#F-7$F]bn$\"3
GTo7s;')oCF-7$F`t$\"31buHuFp7EF-7$F^il$\"3v%oelo,A#GF-7$Fet$\"3)HzH6Z%
4qHF-7$$\"3T$3x;l&=45F-$\"3YeA,,HeAIF-7$Ffil$\"3a(>lZyah0$F-7$$\"3I3-j
r-u55F-$\"3[g5zU[9mIF-7$$\"3$*\\7Gy%e7,\"F-$\"3k0;+g,%=2$F-7$$\"3c\"HK
\\ow<,\"F-$\"3'Gd6$Q6YtIF-7$Fjt$\"3mHG([Af72$F-7$F^jl$\"3$H3#>g:/GIF-7
$F_u$\"3#p'>su0nZHF-7$Fdu$\"3K3?o0_duFF-7$F]\\m$\"3<V]d``q;FF-7$Fiu$\"
3my!QlE^io#F-7$$\"34Dcw`VQD5F-$\"3m+CI>?m#o#F-7$$\"3:]i!>,Zf-\"F-$\"3y
M3,y&>5o#F-7$$\"3@vo/q'4l-\"F-$\"33=R=A&z6o#F-7$Fj\\m$\"3#eR**eppHo#F-
7$$\"3&*\\(oWk(>G5F-$\"3G.nI%))Q1p#F-7$F^v$\"3')y:\\k/E-FF-7$Fcv$\"3&R
m>/Rbps#F-7$Fhv$\"3w62/(>Luu#F-7$$\"3aLe9bt!R.\"F-$\"3U=KlPC-^FF-7$F]f
n$\"3+G^u9(oNv#F-7$$\"3umT5qp)\\.\"F-$\"3Wh]z*yw\\v#F-7$F]w$\"3q*)G@'y
u^v#F-7$$\"3;+D1&emg.\"F-$\"3;O7!*QZ6aFF-7$Fefn$\"3q_GICFx^FF-7$$\"3NL
3-+i9P5F-$\"3iW#f$z&[\"[FF-7$Fbw$\"3()*z;VAlKu#F-7$Fgw$\"3zge-FY#fr#F-
7$F\\x$\"3)zm0Z$>/xEF-7$Ffx$\"3C3Ok-b]$e#F-7$F^^m$\"3qsc&Rlg,b#F-7$F[y
$\"3%4%z@7rWHDF-7$$\"3'****\\7ga40\"F-$\"3B!zHODRQ_#F-7$Ff^m$\"3u6=HFi
X@DF-7$$\"3umm;V%eI0\"F-$\"3L<#)*eVl<_#F-7$F`y$\"3`^'G?VtS_#F-7$F^_m$
\"3A@4?ZMEJDF-7$Fey$\"3?92+)4fn`#F-7$$\"3#*\\7yI3If5F-$\"3%QG+<q%4PDF-
7$$\"3ULeR<vPg5F-$\"3;4(*=>U\"\\`#F-7$$\"3!pT5S?a91\"F-$\"3s\"fWtZn)HD
F-7$Fjy$\"3Df\\a;S#=_#F-7$Fi_m$\"3S:TL#z(R)\\#F-7$F_z$\"3/2\"z`4RqY#F-
7$Fdz$\"3!RHSgR/\")R#F-7$Fi`m$\"3I2qcY9erBF-7$Fiz$\"3'QV!omjCaBF-7$Fgj
n$\"3_o_5m/XYBF-7$F^[l$\"3TIoMC()eWBF-7$F_[o$\"374lF0zuXBF-7$Fc[l$\"3O
_]QX2JXBF-7$Fg[o$\"3nEz*4$R\")RBF-7$Fh[l$\"3'H@l5\"3^FBF-7$$\"3ym\"zW?
)\\*3\"F-$\"3/&\\H_.wnI#F-7$F]\\l$\"3y0#[PO.,G#F-7$Fb\\l$\"3Djuj&3'fDA
F-7$Fg\\l$\"3m>rl$\\'[&=#F--F\\]l6&F^]lFb]lFb]lF_]l-F$6$7bu7$F($\"3[Za
;boe\\5F-7$F/$\"3[4&pdllr.\"F-7$Fccm$\"3nnLm??2D5F-7$F4$\"3)G-M$R2k95F
-7$$\"31Le9w)*=#4*F*$\"3JOxZ1Y/65F-7$F\\^o$\"3nk'ozEK(45F-7$$\"3anTgi'
=N6*F*$\"3m%)>j^K$4,\"F-7$F9$\"3`^80;if95F-7$F^dm$\"38YviB)Gy-\"F-7$F>
$\"3=#3'='eCS/\"F-7$$\"3_nTg_u!y<*F*$\"3MlU4@8)40\"F-7$Ffdm$\"33\\Z;by
4c5F-7$$\"3qKe9wb<*>*F*$\"3+Pi(H,c(e5F-7$FC$\"39gI6`'*fe5F-7$Fj^l$\"39
@d<!*y$40\"F-7$FH$\"3KTc.kG?O5F-7$Fb_l$\"3liV5ehD>5F-7$FM$\"3.dJtW&)\\
25F-7$$\"3aLLe>_6,$*F*$\"3t]ptb6J05F-7$Fj_l$\"3oP\"H3e0j+\"F-7$$\"3M++
DE*HBK*F*$\"3S7Ar-]Y55F-7$FR$\"3j$RhX'[T<5F-7$Fbfm$\"3n\"ehQ:al.\"F-7$
FW$\"3#**y6?([rb5F-7$Fbao$\"3)3a^B9&oi5F-7$F_gm$\"3'Gz3Q51k1\"F-7$$\"3
==/,f0U-%*F*$\"3#o]q;m^o1\"F-7$Fjao$\"3OdT:H3Im5F-7$$\"3c$e9T`'H8%*F*$
\"3!43,)o#\\Z1\"F-7$Ffn$\"3Y1B8#)>Ai5F-7$Fh`l$\"3Snv@]?fY5F-7$F[o$\"3%
=!3.=&*pC5F-7$Fhbo$\"3AYL'[r(Q75F-7$F`o$\"3!oj;*\\K)=+\"F-7$F`co$\"3Og
:c!oKY%**F*7$Feo$\"3!=8#y\\&z4\"**F*7$$\"30++DmVg0&*F*$\"3Db\\/C&f7\"*
*F*7$Ffal$\"3%pMR^B-M#**F*7$$\"3b,+voHV;&*F*$\"3uMB3c(os%**F*7$Fjo$\"3
-`.^WKP#)**F*7$F^bl$\"3]uVh=mE35F-7$F_p$\"3$GG23H%R@5F-7$Fdp$\"3U5=iQx
&)\\5F-7$Fip$\"3IY5B^&))>2\"F-7$$\"3M=Hd!4%)**e*F*$\"3w5$Q\"*QB\\2\"F-
7$Fjdo$\"3i!)GX'=go2\"F-7$$\"3C^(=<Sg%*f*F*$\"39EoTwvsx5F-7$Fbim$\"3s*
psSJwu2\"F-7$$\"3<%ekGrO*3'*F*$\"37KL**z33w5F-7$Fbeo$\"3c4#*301at5F-7$
$\"34</,CIT='*F*$\"3%pN(y\"G!))p5F-7$F^q$\"3/lg-P-:l5F-7$F_jm$\"3$43K8
4+5.\"F-7$Fcq$\"3_P\\#oNPk*)*F*7$F\\[n$\"3'=S6l4R#[(*F*7$Fbcl$\"38XvX9
*>!Q'*F*7$$\"3;n;H(R)3#p*F*$\"3=T!)fX>3,'*F*7$Fd[n$\"3'[zZK&*=zd*F*7$$
\"37o;a$3M;q*F*$\"35$44TOU%p&*F*7$Fhq$\"3uf+#G<hid*F*7$$\"3y$eky()e>r*
F*$\"3bB`&GM&z.'*F*7$Fjcl$\"3!4q)\\#3fAl*F*7$$\"3[</E!yiIs*F*$\"3dGH!
\\Bq3s*F*7$F_dl$\"3J/)oa$**>3)*F*7$Fddl$\"3MhrG#e=I+\"F-7$F]r$\"3)*)G5
\"ec\\H5F-7$Fael$\"31E\"fYj\\r2\"F-7$Fbr$\"3#43\">;S746F-7$$\"3%Re9;xH
bz*F*$\"3!37wrsmF6\"F-7$Fe\\n$\"39'o(p^[m86F-7$$\"3+=/^hNJ1)*F*$\"3VVE
4o/j66F-7$F^fl$\"3*Ry\"=?ya16F-7$Fb]n$\"3!\\a'o:`<(3\"F-7$Fgr$\"3ijsy%
*[Gc5F-7$Fffl$\"3mHq_QMcW(*F*7$F\\s$\"3_`BBGw,u))F*7$Fc\\p$\"3IP#G)e(e
y_)F*7$F^gl$\"3.-fT:P&QL)F*7$$\"3u</,MP8,**F*$\"3^v1B9ux6$)F*7$F`]p$\"
3#o=TK2)G[$)F*7$$\"3_%e9T1[=\"**F*$\"3'RUG!H10\\%)F*7$Fas$\"3u\\9E13#*
=')F*7$Fh]p$\"3W*R?_Z+L7*F*7$Ffgl$\"3m3'>'G9O)))*F*7$F`^p$\"3!em(HWQf
\"4\"F-7$Ffs$\"3r?_,\\$)R>7F-7$Fe`n$\"3emf%)G.M#Q\"F-7$F^hl$\"3+BOgc?a
m:F-7$F]an$\"3ucF,)f@dw\"F-7$F[t$\"3mvGOy\"zD(>F-7$Fean$\"3oYp<X\"or=#
F-7$Ffhl$\"3#R(p'GW$z#R#F-7$F]bn$\"31+r+h&y7e#F-7$F`t$\"3Q<^V,=kXFF-7$
F^il$\"3AgJg*G`&fHF-7$Fet$\"3%)42l!*4DsIF-7$$\"3yTg-Xum35F-$\"3WUhWJ&R
d3$F-7$Ff`p$\"3E\\w!ob!f#4$F-7$$\"3/D\"G$eQq45F-$\"3ExL#HtYK4$F-7$Ffil
$\"3K0<KrHA)3$F-7$Fcap$\"3MYvk.$*[jIF-7$Fjt$\"3$4zz_b8N-$F-7$F^jl$\"3:
xqw$[9i\"HF-7$F_u$\"3Z,0Mc%pE\"GF-7$$\"3@+D1W_i<5F-$\"3kh\"G'p)RQx#F-7
$Ffjl$\"3!R1**\\pKfu#F-7$$\"32]iluk>>5F-$\"3g\">H?qdjt#F-7$$\"3.+v==-s
>5F-$\"3BTq1\")opHFF-7$$\"3?](=<'RC?5F-$\"3b:xY_c&es#F-7$Fdu$\"36JW&4S
tYs#F-7$F^[m$\"3y%='f!4aes#F-7$Fc[m$\"3R-#eMAu!HFF-7$Fh[m$\"33/8meA0MF
F-7$F]\\m$\"3(Q9RDex/u#F-7$Fb\\m$\"3oiCd<DLcFF-7$Fiu$\"3K%Hvl#=*Qx#F-7
$Fdcp$\"3Af#p=pQ@z#F-7$Fj\\m$\"3;qo1H\"yf!GF-7$$\"3*[7Gj)\\jF5F-$\"35u
%4U'*[/\"GF-7$Fadp$\"3q&Q8z!=)H\"GF-7$$\"3,v$4EIg(G5F-$\"3mzaMs.V8GF-7
$F^v$\"3\"=CGM-<<\"GF-7$Fcv$\"37wbR^F@)y#F-7$Fhv$\"3.HEX:BSVFF-7$F]w$
\"3%[/!oD9r'o#F-7$Fbw$\"3)G@Q/wb!QEF-7$$\"3O$e9\"*Hk'Q5F-$\"3yr)y;R#GA
EF-7$Fgw$\"32bd([[;8h#F-7$$\"3Tek`O<8S5F-$\"3)>uJm$)owg#F-7$$\"3;]PM#)
3iS5F-$\"3-Rtv/^?0EF-7$$\"3qT5:G+6T5F-$\"3l*e+03iQg#F-7$F\\x$\"3Q(>d(Q
@b.EF-7$Fax$\"3bFcEu-C6EF-7$Ffx$\"37%oB3&z-CEF-7$Fign$\"3jBOM$o%*zi#F-
7$F^^m$\"3DO5!\\ia!HEF-7$Fahn$\"3qA]IKLWEEF-7$F[y$\"3ibZh#y'y>EF-7$Ff^
m$\"3'y^HGIKMf#F-7$F`y$\"3#yw!=i>TbDF-7$F^_m$\"3U)e\"eiLH;DF-7$Fey$\"3
WzhG43b%[#F-7$Fdip$\"3mp4\"3V3IZ#F-7$Fiip$\"3ygh\")3zQlCF-7$F^jp$\"3M.
cgU.[hCF-7$Fjy$\"37ZMgE:ngCF-7$Fi_m$\"3CgZdm4@kCF-7$F_z$\"37(>\\An!QnC
F-7$$\"3QL3Fe#Rx1\"F-$\"3;yu[soImCF-7$Fa`m$\"3!)oTtc(>CY#F-7$$\"3GLe9w
,')p5F-$\"3MH4]%eh`X#F-7$Fdz$\"3Ox2`;L8XCF-7$Fi`m$\"3)zG))*Ho7<CF-7$Fi
z$\"3!3ggfNZSQ#F-7$Fgjn$\"3/m7%)*HhcN#F-7$F^[l$\"3P0Ia(ewUL#F-7$$\"3'o
;/1Y+,3\"F-$\"30LDh_s<EBF-7$F_[o$\"37S=k\"\\%4@BF-7$$\"37+D\"yi:B3\"F-
$\"3t[MX0df=BF-7$Fc[l$\"3F&4[)e]&zJ#F-7$Fg[o$\"3*Qaw+1u%=BF-7$Fh[l$\"3
Ro$R%\\TM;BF-7$Fg\\q$\"3w\"*=4%GLjI#F-7$F]\\l$\"3k_Mu0Fr'G#F-7$Fb\\l$
\"391cgNKgLAF-7$Fg\\l$\"3%)>'HqYh/>#F--F\\]l6&F^]lF_]lFb]lF_]l-F$6$7hn
7$F($\"3:+++++^H5F-7$F/$\"3J$\\84j,3.\"F-7$F4$\"3tGzZN(e<.\"F-7$F9$\"3
!Hu[aBYE.\"F-7$F>$\"32rj!=#RLL5F-7$FC$\"3[#>sA]4Q.\"F-7$FH$\"3\"4;o[&3
1M5F-7$FM$\"3vu1\"RUDT.\"F-7$FR$\"3y*Qqa-zR.\"F-7$FW$\"3ysf\"4Z8O.\"F-
7$Ffn$\"3a$o^!)[/I.\"F-7$F[o$\"3768Ir*oA.\"F-7$Feo$\"3G()*f-)Q@J5F-7$F
_p$\"3D(y>uE3*H5F-7$Fip$\"3+lKpADTG5F-7$F^q$\"3:/J@`)[o-\"F-7$Fcq$\"3T
uH9^2tC5F-7$Fhq$\"3_RX)3$HrA5F-7$F]r$\"3iY;d)Q.,-\"F-7$Fbr$\"3'4R%R0Vb
<5F-7$Fgr$\"3)3+Hu#[\\95F-7$F\\s$\"3QmHZZ=K65F-7$Fas$\"3b%zg7tOx+\"F-7
$Ffs$\"3:+9p.P>/5F-7$F^hl$\"3CI#[W\">=-5F-7$F[t$\"3zpW'*R')4+5F-7$$\"3
3Fp^y!R++\"F-$\"39DEn6$['**HF-7$$\"3)3_]\\(o<+5F-$\"3Ufp!3]3%)*HF-7$$
\"3n9TQrYJ+5F-$\"33&R[a9pr*HF-7$$\"3Z3x\"yY_/+\"F-$\"3i@+WX-$f*HF-7$$
\"3%e*[og!G2+\"F-$\"3OCk%3\"QX$*HF-7$Fean$\"3KX<x&>z4*HF-7$$\"3RekGR[b
,5F-$\"3KO\\;>a.')HF-7$Ffhl$\"3y!3)f0*)4\")HF-7$F]bn$\"3%)fMbFwCrHF-7$
F`t$\"3sGoo\"GD9'HF-7$F^il$\"3]d*[iJ$RWHF-7$Fet$\"3/Yuv&Q[u#HF-7$Fjt$
\"3#R'o`w99\"*GF-7$F_u$\"3UI;QoG0aGF-7$Fdu$\"3TB1Mzv<=GF-7$Fiu$\"3yPYD
'4ZQy#F-7$F^v$\"3wsf5JH;YFF-7$Fhv$\"3n$)ooMuo7FF-7$Fbw$\"3C4/$Q`Vtn#F-
7$F\\x$\"3UM^,3$ock#F-7$Ffx$\"3d9F='Q<9h#F-7$F[y$\"3eG()4!>Z&zDF-7$F`y
$\"3A,He')**fYDF-7$Fey$\"3(fg'**yiu9DF-7$Fjy$\"3?hbe#zt<[#F-7$F_z$\"3?
1!)p\"\\w.X#F-7$Fdz$\"3:O)R!)pG'=CF-7$Fiz$\"3E<i>7**\\(Q#F-7$F^[l$\"3G
7mU]^?fBF-7$Fc[l$\"3s0^$)Hm8FBF-7$Fh[l$\"3=H2#)**ox)H#F-7$F]\\l$\"3IHh
WV:()oAF-7$Fb\\l$\"3#>We)fecSAF-7$Fg\\l$\"3=**********[5AF--F\\]l6&F^]
lFb]lF_]lF_]l-%+AXESLABELSG6$Q\"x6\"Q!6\"-%%VIEWG6$;$\"\"*Fa]l$\"#6Fa]
l%(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 44.000000 45.000000 0 0 "
Curve 1" "Curve 2" "Curve 3" "Curve 4" "Curve 5" "Curve 6" }}}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 164 "g:=x->x:\n'a(n)'=a(n); 'b(n)'=b(n)
;\nreadlib(isolate):\nexpand(simplify(Sum(b(n)^2, n=1..infinity)))=int
(g(x)^2, x=alpha..beta):\nisolate(%, Sum(1/n^2, n=1..infinity));" }}
{PARA 11 "" 1 "" {XPPMATH 20 "6#/-%\"aG6#%\"nG\"\"!" }}{PARA 11 "" 1 "
" {XPPMATH 20 "6#/-%\"bG6#%\"nG,$*&)!\"\"%#n|irG\"\"\"*&F,F-%#PiGF-F+!
\"#" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#/-%$SumG6$*&\"\"\"F(*$)%#n|irG
\"\"#F(!\"\"/F+;F(%)infinityG,$*$)%#PiGF,F(#F(\"\"'" }}}}{SECT 0 
{PARA 3 "" 0 "" {TEXT -1 21 "Potentiel d'un nombre" }}{EXCHG {PARA 0 "
> " 0 "" {MPLTEXT 1 0 168 "restart;\npotentiel:=proc(m)\n  local n, k,
 l;\n  n:=m; k:=1;\n  while n>10 do\n    l:=convert(n, base, 10);\n   \+
 n:=product(l[i], i=1..nops(l));\n    k:=k+1;\n  od;\n  k; \nend:" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 211 "potmax:=proc(n)\nlocal pmax
, kmax, k, r;\npmax:=1; kmax:=1;\nfor k from 2 to n do\n  r:=potentiel
(k);\n  if r>pmax then \n    kmax:=k; \n    pmax:=r;\n  elif r=pmax th
en\n    kmax:=kmax, k;\n  fi;\nod;\n[pmax, [kmax]];\nend:" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "potmax(1000);" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#7$\"\"'7+\"$z'\"$)o\"$(p\"$p(\"$'z\"$o)\"$'))\"$n*\"$w*
" }}}}{SECT 0 {PARA 3 "" 0 "" {TEXT -1 30 "Nombre de z\351ros \340 la \+
fin de n!" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 49 "nb0:=n->sum(flo
or(n/5^k), k=1..floor(log[5](n)));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#
>%$nb0GR6#%\"nG6\"6$%)operatorG%&arrowGF(-%$sumG6$-%&floorG6#*&9$\"\"
\")\"\"&%\"kG!\"\"/F7;F4-F06#-&%$logG6#F66#F3F(F(F(" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 11 "nb0(10^20);" }}{PARA 11 "" 1 "" {XPPMATH 
20 "6#\"5'****************\\#" }}}}}{MARK "0 0 0" 25 }{VIEWOPTS 1 1 0 
1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }