摘要：
var len:array[1..400,1..400] of longint; number:array[1..2400] of longint; dp:array[1..400,0..600] of longint; s,i,x:longint;function min(a,b:long... 阅读全文
摘要：
贪心，不知道怎么想的就大师难度了有些细节需要处理一下：首先是注意一行可能有多个标注，用inc记录，初始值付成1.另一个数组存好多个k（=0=只是觉得比较方便，反正数据弱），表示每一页（反正不会超过n，谁叫你说一定有解呢，就是人性，哼），用指针d记录打印到了第几页最后从1到n扫一遍，可以放就放，不能放... 阅读全文
摘要：
第一题：fibo矩阵快速幂无压力，给信心的type matrix=array[1..2,1..2] of qword;var c,cc:matrix; t,bili:longint; n,p:int64; function mul... 阅读全文
摘要：
不错的基础dp首先建立两个三维数组，一个记录map[i][j][k]=sum为坐标(i,j,k)的点权值为sum，另一个数组初值为0，dp转移方程：f[i][j][k]:=max(f[i-1][j][k],f[i][j-1][k],f[i][j][k-1]);代码var f,map:a... 阅读全文