2431: [HAOI2009]逆序对数列

Time Limit: 5 Sec Memory Limit: 128 MB
Submit: 954 Solved: 548
[Submit][Status]

Description

对于一个数列{a_i}，如果有i<j且a_i>a_j，那么我们称a_i与a_j为一对逆序对数。若对于任意一个由1~n自然数组成的数列，可以很容易求出有多少个逆序对数。那么逆序对数为k的这样自然数数列到底有多少个？

Input

第一行为两个整数n，k。

Output

写入一个整数，表示符合条件的数列个数，由于这个数可能很大，你只需输出该数对10000求余数后的结果。

Sample Input

样例输入

4 1

Sample Output

样例输出

样例说明：

下列3个数列逆序对数都为1；分别是1 2 4 3 ；1 3 2 4 ；2 1 3 4；

测试数据范围

30%的数据 n<=12

100%的数据 n<=1000，k<=1000

HINT

Source

Day1

题解：乍一看看到逆序对个数这样的字眼，还有些小激动呢，再一看，居然是个DP（Phile：呵呵 HansBug：TT）——这个嘛，递推式也很明显——f[i,j]:=f[i-1,1]+f[i-1,2]+f[i-1,3]....+f[i-1,j]，所以直接求吧（注注注注注意：记得%10000，还有%10000时先加个10000以防万一）

 var

    i,j,k,l,m,n:longint;

    a:array[..,..] of longint;

 begin

      readln(n,m);

      fillchar(a,sizeof(a),);

      for i:= to n do

          a[i,]:=;

      for i:= to n do

          begin

               l:=a[i-,];

               for j:= to m do

                   begin

                        if not(j<i) then l:=l-a[i-,j-i];

                        l:=l+a[i-,j];

                        a[i,j]:=(l+) mod ;

                   end;

          end;

      writeln(a[n,m]);

 end.

秒客网

2431: [HAOI2009]逆序对数列