{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 }{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 "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 }{PSTYLE "" 11 12 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 }1 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }} {SECT 0 {EXCHG {PARA 0 "" 0 "" {TEXT -1 21 "D\351finition par boucle" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 317 "suites:=proc(n::posint) \n local u,v,w,x,i,tempu,tempv,tempw,tempx;\n u:=0;v:=0;w:=1;x:=9;\n for i from 2 to n do\n tempu:=10*u + v ;\n tempv:= \+ w ;\n tempw:= x; \n tempx:= 9*v+9*w+9*x ;\n u:=tempu;\n v:=tempv;\n w:=tempw;\n x:=tempx;\n end d o;\n[u,v,w,x];\nend proc; " }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%'sui tesGf*6#'%\"nG%'posintG6+%\"uG%\"vG%\"wG%\"xG%\"iG%&tempuG%&tempvG%&te mpwG%&tempxG6\"F4C(>8$\"\"!>8%F8>8&\"\"\">8'\"\"*?(8(\"\"#F=9$%%trueGC *>8),&F7\"#5F:F=>8*F<>8+F?>8,,(F:F@*&F@F=FF7FH>F:FL> FF?FP7&F7F:F " 0 "" {MPLTEXT 1 0 11 "suites(11);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#7&\"*\"3S(=)\"*\\B0 &*)\"+qhWU*)\",+9wV$*)" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 20 "d\351fi nition r\351cursive" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 176 "suites2:=proc(n::posint)\n local res;\n if n=1 then [0,0,1,9]\n else\n res:=suites2(n-1);\n [10*res [1]+res[2],res[3],res[4],9*(res[2]+res[3]+res[4])];\n end if;\nend pr oc;" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%(suites2Gf*6#'%\"nG%'posintG6 #%$resG6\"F,@%/9$\"\"\"7&\"\"!F2F0\"\"*C$>8$-F$6#,&F/F0F0!\"\"7&,&&F66 #F0\"#5&F66#\"\"#F0&F66#\"\"$&F66#\"\"%,(F@F3*&F3F0FCF0F0*&F3F0FFF0F0F ,F,F," }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "n:=11;suites2(n);s uites(n);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"nG\"#6" }}{PARA 11 " " 1 "" {XPPMATH 20 "6#7&\"*\"3S(=)\"*\\B0&*)\"+qhWU*)\",+9wV$*)" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#7&\"*\"3S(=)\"*\\B0&*)\"+qhWU*)\",+9wV $*)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "5 3 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }