硬币组合

作者：Shlomi Fish

https://projecteuler.net/problem=31

在英国，货币由英镑（£）和便士（p）组成，通常流通的有八种硬币。

1p, 2p, 5p, 10p, 20p, 50p, £1 (100p) and £2 (200p).

可以用以下方式组成 2 英镑

1×£1 + 1×50p + 2×20p + 1×5p + 1×2p + 3×1p

使用任意数量的硬币，可以用多少种不同的方式组成 2 英镑？

源代码： prob031-shlomif.pl

use v6;

my @coins = (1,2,5,10,20,50,100,200);

my @r_coins = @coins.reverse;

my %cache;

sub calc(Int $max_idx, Int $sum) {
    return %cache{"$max_idx,$sum"} //= do {
        my Int $ret;
        if ($max_idx == @r_coins.end) {
            $ret = 1;
        }
        elsif ($sum < @r_coins[$max_idx]) {
            $ret = calc($max_idx+1, $sum);
        }
        else {
            $ret =
            (
                calc($max_idx+1, $sum)
                + calc($max_idx, $sum-@r_coins[$max_idx])
            );
        }
        $ret;
    };
}

print calc(0, 200), "\n";