2014年6月6日
poj 2185 （KMP)
完全不会啊……附一份题解：http://blog.sina.com.cn/s/blog_69c3f0410100tyjl.html 1 var i,j,k,r,c,x:longint; 2 ch:array[0..10100,0..80] of char; 3 s:string; 4... Read More
posted @ 2014-06-06 19:35 ZYF-ZYF Views(183) Comments(0) Diggs(0) Edit
poj2752 水题
又2b了一次…… 1 var s:ansistring; 2 ans,pre:array[0..10000] of longint; 3 i,k,tot:longint; 4 procedure main; 5 begin 6 pre[1]:=0;k:=0; 7 for i:=... Read More
posted @ 2014-06-06 18:56 ZYF-ZYF Views(140) Comments(0) Diggs(0) Edit
poj2406 周期
脑残wa了一次 1 var s:ansistring; 2 ans,i,k,m:longint; 3 pre:array[0..1010000] of longint; 4 function max(x,y:longint):longint; 5 begin 6 if x>... Read More
posted @ 2014-06-06 18:21 ZYF-ZYF Views(156) Comments(0) Diggs(0) Edit
poj 2503 快排+二分
var x,y:array[0..110000] of string; i,n,l,r,mid:longint; s:string;procedure qsort(h,l:longint); var i,j:longint; temp,m:string; begin i:=h;j... Read More
posted @ 2014-06-06 09:17 ZYF-ZYF Views(165) Comments(0) Diggs(0) Edit
poj2001 Shortest Prefixes （trie）
读入建立一棵字母树，并且每到一个节点就增加这个节点的覆盖数。然后再重新扫一遍，一旦碰到某个覆盖数为1就是这个单词的最短前缀了。不知为何下面的程序一直有bug……不知是读入的问题？type node=record w:longint; go:array['a'..'z'] of lon... Read More
posted @ 2014-06-06 08:49 ZYF-ZYF Views(194) Comments(0) Diggs(0) Edit
2014年6月4日
tyvj1161聚会的名单（trie树）
背景 Background明天就是candy的生日，candy又会邀请自己的一大堆好友来聚会了！哎！又要累坏飘飘乎居士了！！描述 Description明天就是candy的生日。晚上，candy找到了飘飘乎居士。她给了飘飘乎居士一张名单，名单上记录了n个candy的好朋友。可是，飘飘乎居士发现，名单... Read More
posted @ 2014-06-04 19:11 ZYF-ZYF Views(222) Comments(0) Diggs(0) Edit
2014年6月3日
hud 3336 count the string (KMP)
这道题本来想对了，可是因为hdu对pascal语言的限制是我认为自己想错了，结果一看题解发现自己对了……题意：给以字符串计算出以前i个字符为前缀的字符中在主串中出现的次数和如：num(abab)=num(a)+num(ab)+num(aba)+num(abab)=2+2+1+1=6;题解：next[... Read More
posted @ 2014-06-03 19:03 ZYF-ZYF Views(202) Comments(0) Diggs(0) Edit
2014年6月2日
JSOI2008星球大战（并查集）
膜拜HZWER大牛的编码能力！附上他的代码（我的代码不知为何一直莫名出错……）#include#include#includeusing namespace std;int tot,n,m,d,father[400001],head[400001],q[400001],ans[400001],cnt... Read More
posted @ 2014-06-02 09:33 ZYF-ZYF Views(184) Comments(0) Diggs(0) Edit
HAOI2006受欢迎的牛
求出强联通分量之后判断出度为0的点有几个，有1个就输出这个分量的点的数目，否则输出0；var i,j,n,m,x,y,ans1,ans2,t,cnt,top:longint; head,next,go,sta,inp:array[0..50010] of longint; low,dfn... Read More
posted @ 2014-06-02 07:51 ZYF-ZYF Views(168) Comments(0) Diggs(0) Edit
2014年6月1日
6月1日做题感受
今天上午做题状态还可以，但下午就感觉状态特别不好，什么都看不懂，都不想干，也许是一整天搞oi弄得心烦了吧。也许我应该把oi和数学调整好时间…… Read More
posted @ 2014-06-01 22:08 ZYF-ZYF Views(158) Comments(0) Diggs(0) Edit