fly-fly

<br /> <br />Poi2004 gra{经典}<br />题意：给定一个1*m的棋盘，现在上面有n个棋子，每次可以把一个棋子移到编号比它的编号大的第一个格子里面，谁把一个棋子移到了m中就获胜。<br />M<=10^9,n<=10^6。<br /> <br />相当经典的一道题啊。<br />S1:若a[n]=m-1，a[n-1]=m-2,……则只能移动他们，Ans=这样连续的个数。若此时ans>0,则输出。<br />S2:谁都不想把棋子移动到m-1去，因此若谁移动后所有棋子都在[m-n-1..

<br /> <br />Poi 2004 pin<br />题意：pin码是一个十六进制的有4个元素的数组。现在要你猜pin码，对于一个数组a[i]，表示i通过转换后是a[i]，现在你可以询问b,a，表示pin码经过a转换是否是b数组。询问次数不超过30次。<br /> <br />首先的想法是必需一个个考虑。先求出pin中有哪些数字，但是这个数字可能出现多次。这样的枚举量是受不了的。所以转化为哪些没出现过，也就是哪些改了无影响。16次。<br />确定了后，考虑只有1个数字只填在一个位置的枚举量较小，称

program xqz;const maxm=200001;var i,j,k,m,n,ll,rr,x,de,ans,o:longint; a,b,s,t,y:array[0..maxm] of longint; c,f:array[0..maxm*2] of longint;procedure swap(var a,b:longint);var k:longint;begin k:=a; a:=b; b:=k;end;procedure sort1(ll

<br />program xqz;const maxn=500005;var i,j,k,m,n,ll,rr:longint; st:ansistring; f,l,r,edge,next:array[0..maxn] of longint;begin readln(st); n:=length(st); f[1]:=n; ll:=0; rr:=0; for i:=2 to n do begin r[i]:=i+1; l[i]:=i-1;

<br />program xqz;const maxn=100005; maxm=200005;var i,j,k,m,n,ll,rr,b,p:longint; q,ind,edge:array[0..maxn] of longint; point,next:array[-maxm..maxm] of longint; z:array[0..maxn] of boolean; ok:boolean;begin read(n,m); ok:=true;

<br />program xqz;const maxn=50000;var ans,i,j,k,m,n,k1,k2,t1,t2:longint; f,fa,s,x,y,re:array[0..maxn] of longint; pos,o:array[0..100000] of longint; a:array[0..maxn,0..2] of longint;function find(i:longint):longint;var kk:longint;beg