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分…… 晚上又是一场比赛。...

免费的.CO.CC域名或者.TK域名大家应该都有（我就在用CO.CC），可是最近有一个澳大利亚的域名商正在放送免费的.ASIA域名，期限是一年。 首先打开主页： http://www.crazydomains.com.au/ ，找到首页上的域名输入框，选择ASIA，如下图。 0美刀！点一下Search。然后就会看到yourname.asia后面$0的提示。如果是$1，那么你需要某种修改你的IP地址的方式。 接下来，点Add To Cart，然后Register Selected。再接下来，注册一个账号，我不说了。Next。再接下来，会让你买一堆增值服务什么的，注意都要美刀！全部不要选！一路 NEXT！ 最后会出来一个「你的订单正在处理」的提示，点右上角MY ACCOUNT。然后是Domain Name Manager下的Login，然后是登录。 接下来不用解释了，你的域名已经到手了。域名管理什么的我不说了，自己去 http://www.freehao123.com/crazydomains/ 看教程。 我注册了一个域名： https://xuyh0120.asia ，绑到现在的 000webhost上。 另外，...

老早就在网上看到了Host1Free VPS的消息，想去申请，结果用家里的电脑申请提示Only registrations from unique IPs allowed。然后挂Go^_^Agent，提交成功，结果被Reject 了。反反复复尝试，结果废掉Gmail+Hotmail*2+QQ*2。。。 后来把消息告诉 imbushuo ，他直接在学校机房申请，结果成功了。功了。了。。 后来发现是动态IP的问题，也就是申请的用户使用的不能是动态IP，否则就挂。这回是在我爸单位申请的，成功了。 128M内存，10G硬盘，只能拿来玩玩，估计装wordpress都可能吃不消。IP：94.249.250....

每次老师叫我们去讲题目的时候，初一的人总会高呼郭同学的名字。我一直不知道他们为什么干这个，也许郭同学特别好吧。但是今天，我在学军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 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)...