最近无聊，在必应上搜了搜XJOI，结果……还真被刨出来了…… http://cn.bing.com/search?q=www.hzxjhs.com%3A83&go=&qs=n&form=QBLH&pq=www.hzxjhs.com%3A83&sc=0-3&sp=-1&sk= http://cn.bing.com/search?q=%2Bxjoi&go=&qs=n&form=QBRE&pq=%2Bxjoi&sc=0-0&sp=-1&sk= 然后我马上想，必应收录，雅虎会不会收录？结果还真……收录了…… http://search.yahoo.com/search;_ylt=A2KLf7U8vblQtAIASlKbvZx4?p=XJOI&toggle=1&cop=mss&ei=UTF-8&fr=yfp-t-701 http://search.yahoo.com/search;_ylt=A0oGdUdIvblQiAMAUcRXNyoA?p=www.hzxjhs.com%3A83&fr2=sb-top&fr=yfp-t-701&type_param= 然后腾讯搜搜： http://www.soso.com/q?pid=s.idx&cid=s.idx.se&w=www.hzxjhs.com%3A83 http://www.soso.com/q?sc=web&bs=www.hzxjhs.com%3A83&ch=w....
NOIP复赛有感
NOIP真是一年比一年水。之前被XJOJ上的题狂虐，这次终于轮到我虐题了。 首先是星期五。上午整个年级疯传XXY要救我们出去上课。然后我们去找班主任请假。然后我们AC了。中午吃完饭，坐上家长的车，去XJ。 车上我爸告诉我，他给我装了Win8，让我试一下。我一打开，x64……话说我的声卡在Win8 x64下有Bug不能用……然后到了XJ，下x86 ISO，重装。一边重装一边拿出我的诺基亚N81逛 XJOJ…… 话说刚到XJ，电子阅览室人满为患，我一看就看到JC和DZY两个去虐提高组的牛，他们提早两天就把学校给root了，然后把自己给unlock了。 话说xuejun-wireless真的是一天比一天神犇，没事给你搞个无法访问Internet，以前苦于网线太短，这次带了一根超长的延长线，本来想着解决问题了，谁知发现XJ的网线接触不良 ……Orz 装完系统。我一边下各种驱动一边刷OJ。这次放了一份奇异的比赛，可是我不想做，因为我不想失去信心……果断交样例。4道题总共得了10分…… 晚上又是一场比赛。...
信息奥赛班的神人一个
每次老师叫我们去讲题目的时候，初一的人总会高呼郭同学的名字。我一直不知道他们为什么干这个，也许郭同学特别好吧。但是今天，我在学军OJ讨论区上看到了这么一段话： 标题：神人！ 1楼：yujialuo2011 「guoyuqi11」（蓝天注：郭同学）3分钟十一道题，平均十六秒一题，神人那！大家向他多多请教！如何才能练出如此神功！ 2012-07-18 16:27:11 2楼：Wuao11比卡门还神 2012-07-18 16:28:48 3楼：cyf2 36119 zhaoyq2011 P1341 Accepted 2012-07-18 16:07:16 36118 guoyuqi11 P1547 Accepted 2012-07-18 15:55:56 36117 guoyuqi11 P1336 Accepted 2012-07-18 15:55:37 36116 guoyuqi11 P1317 Accepted 2012-07-18 15:55:26 36115 guoyuqi11 P1320 Accepted 2012-07-18 15:55:10 36114 guoyuqi11 P1308 Accepted 2012-07-18 15:54:43 36113 guoyuqi11 P1014 Accepted 2012-07-18 15:54:18 36112 guoyuqi11 P1357 Accepted 2012-07-18 15:53:...
各种OIer的快排（Pascal语言）
OIer 1： procedure qsort (l,r: longint ); var i,j,m,t: longint ; begin i:=l; j:=r; m:=a[(l+r) div 2 ]; repeat while a[i]m do dec(j); if ij; if l <j then qsort(l,j); if i <r then qsort(i,r); end ; OIer 2： Procedure QuickSort (Left, Right : Longint ); Var LeftPointer, RightPointer, Medium, Temp : Longint ; Begin LeftPointer := Left; RightPointer := Right; Medium := a[(Left + Right) Shr 1 ]; Repeat While a[LeftPointer] Medium Do Dec(RightPointer); If LeftPointer j; If Left < RightPointer Then QuickSort(Left,RightPointer); If LeftPointer < Right Then QuickSort(LeftPointer,Right); End ; {End Procedure} OIer 3： procedure kuaipai (z,y: longint ); var i,j,m,t: longint ; begin i:=z;j:=y;m:=a[(z+y) div 2 ]; repeat while a[i]m do dec(j); if ij; if z <j then kuaipai(z,j)...