{VERSION 3 0 "DEC ALPHA UNIX" "3.0" } {USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 1 0 0 0 0 }{CSTYLE "2D Math" -1 2 "Times" 0 1 0 0 0 0 0 0 2 0 0 0 0 0 0 }{CSTYLE "2D Output" 2 20 "" 0 1 0 0 255 1 0 0 0 0 0 0 0 0 0 } {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 -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 }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 }1 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }} {SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 184 "tailsize:=proc(n::p osint)\n local p,q,v;\n for p in \{2,5\} do\n v.p.n:=0;\n q:=p ;\n while n>=q do\n v.p.n:=v.p.n+iquo(n,q);\n q:=p*q\n \+ od;\n od;\n min(v.2.n,v.5.n)\nend: " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "factorial(10);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"( +)GO" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "tailsize(10);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"#" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "factorial(100);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#\" it++++++++++++ko\"4@&=^#ePAF3#zp`iG=l:wRYT*3c\"*HK***f<_*Q'Hfo9i\"Qk#o fr!\\+nEc)Q#*p\"o_T%RW:iK$*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "tailsize(100);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"#C" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 64 "N:=factorial(100):\nfor i from 0 wh ile irem(N,10,'N')=0 do od;\ni;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"# C" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "6 0 0" 0 } {VIEWOPTS 1 1 0 1 1 1803 }