{VERSION 6 0 "IBM INTEL NT" "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 "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 Output" -1 12 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 
2 2 2 2 2 2 1 1 1 1 }1 3 0 0 0 0 1 0 1 0 2 2 0 1 }}
{SECT 0 {SECT 1 {PARA 3 "" 0 "" {TEXT -1 11 "Exercice 32" }}{PARA 0 "
" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 2 "1)" }}{PARA 0 "" 0 
"" {TEXT -1 0 "" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 207 "restart:
\nArGeMean:=proc(n::integer,u0,v0)\nlocal a,b,u,v,j,quotient;\nu:=u0:v
:=v0:quotient:=u0/v0:\nfor j from 1 to n do \na:=u;b:=v;\nu:=evalf(sqr
t(a*b));v:=evalf((a+b)/2);quotient:=u/v:\nod;\nprint(u,v)\nend proc;" 
}}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%)ArGeMeanGf*6%'%\"nG%(integerG%#u0
G%#v0G6(%\"aG%\"bG%\"uG%\"vG%\"jG%)quotientG6\"F3C'>8&9%>8'9&>8)*&F7\"
\"\"F:!\"\"?(8(F>F>9$%%trueGC'>8$F6>8%F9>F6-%&evalfG6#-%%sqrtG6#*&FFF>
FHF>>F9-FK6#,&*&#F>\"\"#F>FFF>F>*&FVF>FHF>F>>F<*&F6F>F9F?-%&printG6$F6
F9F3F3F3" }}}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 
2 "2)" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 28 "seq(ArGeMean(n,2,3),n=0..4);" }{TEXT -1 43 " les cinq
 premiers termes des suites u et v" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$
\"\"#\"\"$" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$$\"+V(*[\\C!\"*$\"+++++D
F%" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$$\"+-ghuC!\"*$\"+s[uuCF%" }}
{PARA 11 "" 1 "" {XPPMATH 20 "6$$\"+O/ouC!\"*$\"+P/ouCF%" }}{PARA 11 "
" 1 "" {XPPMATH 20 "6$$\"+P/ouC!\"*$\"+O/ouCF%" }}}{PARA 0 "" 0 "" 
{TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 22 "3) A traiter \340 la main
" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 22 "4) A \+
traiter \340 la main" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "
" {TEXT -1 2 "5)" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{EXCHG {PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 75 "a:=2:b:=3:evalf(Pi/int(1/sqrt((t^2+a^2)*(t^2+b
^2)),t=-infinity..infinity));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+P
/ouC!\"*" }}}}}{MARK "0" 0 }{VIEWOPTS 1 1 0 3 4 1802 1 1 1 1 }
{PAGENUMBERS 0 1 2 33 1 1 }