{VERSION 3 0 "IBM INTEL NT" "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 "Times" 1 12 0 0 0 1 2 2 2 2 
2 2 1 1 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 }3 3 0 0 0 
0 1 0 1 0 2 2 0 1 }}
{SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 849 "# Nombre de fa\347o
ns de donner 1 euro en pi\350ces de :\n# 1 euro, 50 cts, 20 cts, 10 ct
s, 5 cts, 2 cts, 1ct\n\n# La mani\350re brutale\n\ntemps:=time():\n\nR
:=1:   # Cas 100 = 1*100\n\nfor i1 from 0 to 2 do                     \+
            # Pi\350ces de 50\n     for i2 from 0 to 5 do             \+
               # Pi\350ces de 20\n          for i3 from 0 to 10 do    \+
                  # Pi\350ces de 10\n               for i4 from 0 to 2
0 do                 # Pi\350ces de 5\n                    for i5 from
 0 to 50 do            # Pi\350ces de 2\n                         for \+
i6 from 0 to 100 do      # Pi\350ces de 1\n                           \+
   if 50*i1+20*i2+10*i3+5*i4+2*i5+1*i6=100\n                          \+
    then R:=R+1:\n                              fi:\n                 \+
        od:\n                    od:\n               od:\n          od
:\n     od:\nod:\nprint(R);\ntime()-temps;" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#\"%jX" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"&G6'!\"$" }
}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "1 0 0" 0 }
{VIEWOPTS 1 1 0 1 1 1803 }