10 2013 档案
摘要:哈希+挂链。可以用next数组挂链。 1 const p=99987; 2 type 3 arr=array[1..6]of longint; 4 var 5 a,b:Array[0..200000]of arr; 6 next:Array[0..200000]of longint; 7 i,j,n,has,tot:longint; 8 9 function hash(x:longint):longint;10 var i:longint;11 begin12 hash:=0;13 for i:=1 to 6 do14 hash:=(hash*7+a[...
阅读全文