货币系统

Description

母牛们不但创建了他们自己的政府而且选择了建立自己的货币系统。他们对货币的数值感到好奇。传统地，一个货币系统是由1，5，10，20 或 25，50，100的单位面值组成的。母牛想知道用货币系统中的货币来构造一个确定的面值，有多少种不同的方法。
举例来说, 使用一个货币系统 {1,2,5,10,...}产生 18单位面值的一些可能的方法是:18x1, 9x2, 8x2+2x1, 3x5+2+1等等其它。
写一个程序来计算有多少种方法用给定的货币系统来构造一个确定的面值。

Input

货币系统中货币的种类数目是V。 (1<= V<=25)
要构造的面值是N。 (1<= N<=10,000)
第 1 行: 二个整数，V和N
第 2 ..V+1行： 可用的货币V个整数　(每行一个)。

Output

单独的一行包含那个可能的构造的方案数。

Sample Input

3 10 1 2 5

Sample Output

10  

my @result;
my @v = (1, 2, 5);
my $tar =10;
my @f;
$f[0] = 1;

for my $i (0..@v-1){
    for($v[$i] .. $tar){
        print "f$_ = $f[$_] + f".($_-$v[$i])."\n";
        $f[$_]=$f[$_]+$f[$_-$v[$i]];
        print "f$_ = $f[$_] \n";
    }
}
print "$f[$tar] \n";