Count the coins: Difference between revisions

Content added Content deleted
Line 2,148: Line 2,148:
<lang maple>ways2:=proc(amount,purse)
<lang maple>ways2:=proc(amount,purse)
local a,n,k;
local a,n,k;
a:=Array(1..amount,0);
a:=Array(1..amount);
for k in purse do
for k in purse do
for n from k to amount do
for n from k to amount do