数字编码
Time Limit:10000MS Memory Limit:256000KTotal Submit:38 Accepted:22 Case Time Limit:1000MS
Description
一列有顺序的非负整数,需要把它们编码成一个0、1字符串进行传送。设这一列数为P={P1,P2,...,Pn},其中0<=Pi<32767,具体的编码方法为:把P分成k个段 S1,S2,...,Sk,在第i个段Si 中有a(i)个数字,且该段中每个数字都用b(i)位0、1串来编码表示,另外为了正确解码,还要在该段前面附加上一个消息头,用来指出该段有多少个数字以及每个数字的编码位数,消息头的格式规定如下:首先用8位二进制位表示a(i),这导致0<a(i)<256,另外由于0<=pi<32767,即序列中每个数字最多用15位0、1串编码,因此接着用4位二进制位表示b(i) 。因此si段编码后需要8+4+a(i)*b(i)位。按此格式,序列{p1,p2,...,pn}的编码总位数为a(1)*b(1)+a(2)*b(2)+...+a(k)*b(k)+12*k="" 位,不同的分段方式可能对应不同的编码位数。="" 例如,对数字序列{ 7,6,16,2,1,88,250,222},其最优分段方式是分为2段{7,6,16,2,1}和{88,250,222},a(1)=5,b(1)=5,a(2)=3,b(2)=8,所以该数字序列的最优编码位数为25+24+24=73位。 你的问题是对于给定的数字序序列,按照上述编码规则,求最小的编码位数。
Input
包含n+1整数,其中第一个为正整数n (n<=30000),表示序列的长度,之后是n个非负整数,表示待编码的数字序列。数与数之间用空格隔开。
Output
只包含一个数,表示你计算出的最小编码位数。
Sample Input
8 7 6 16 2 1 88 250 222
Sample Output
73
思路:先转二进制,然后枚举区间,每次都找区间内长度最大值,有两种情况要覆盖
一、没赋过值(其实可以用一个很大的数fillchar,但是考虑到数据规模,所以gg);
二、有最优解 f[i,j]:=ans[i-j]+maxn*j+12; ans[i]:=min(ans[i],f[i,j]);
解析:区间 i 的第 j 个数在此状态下的最小解 f[i,j] ;和区间 i 的答案 ans[i] 最优。
var
f:array[0..30010,0..3010]of longint;
ans,l:array[0..30010]of longint;
i,j,k,n,m,x,maxn:longint;
function min(a,b:longint):longint;
begin
if a<b then exit(a);
exit(b);
end;
begin
read(n);
for i:=1 to n do
begin
read(x);
m:=x;
l[i]:=0;
while m<>0 do
begin
inc(l[i]);
m:=m div 2;
end;
end;
for i:=1 to n do ans[i]:=233333333;
ans[0]:=0;
for i:=1 to n do
begin
maxn:=-maxlongint;
for j:=1 to min(i,255) do//优化是Copy的,FPC不写会TLE
begin
if l[i-j+1]>maxn then maxn:=l[i-j+1];
if (ans[i-j]+maxn*j+12<f[i,j])or(f[i,j]=0)
then f[i,j]:=ans[i-j]+maxn*j+12;
ans[i]:=min(ans[i],f[i,j]);
end;
end;
write(ans[n]);
end.