胡歌-遇到一个好人
困在你的心里走不开
只为了怀一场与你相爱
珍惜着你的好你的坏
怕自己不再被你期待
或许我给的爱不该存在
你才会慢慢快乐起来
挥霍了精神所有的等待
保留着一点点你的爱
你从不拒绝也不叫我走开
却又不想让我留下来
我越来越听话像一个小孩
守着你一直到你想要离开
nusic
如果你遇到了一个好人
记得要让他好好爱
别让他受苦让他走得太快
别让他像我一样悲哀
如果你遇到了一个好人
记得要让他好好爱
我会把所有的悲伤掩埋
不会让你看出来
nusic
困在你的心里走不开
只为了怀一场与你相爱
挥霍了精神所有的等待
保留着一点点你的爱
你从不拒绝也不叫我走开
却又不想让我留下来
我越来越听话像一个小孩
守着你一直到你想要离开
如果你遇到了一个好人
记得要让他好好爱
别让他受苦让他走得太快
别让他像我一样悲哀
如果你遇到了一个好人
记得要让他好好爱
那时候我会远远的躲开
我会把祝福留下来
不让眼泪掉下来
就是后天,有一些紧张了,但是不是很着急,也许应该紧张一些了
也没有什么非要准备的,觉得都是靠平时的积累(虽然记性不好,积累能力的比较弱),成败在此一举,希望可以成功!!
也许noip之后有一段时间不能上网了，文化课落的有点多了，得追一下，很有可能blog不能更新了，不过没关系，这里的点击次数非常少
虽然小姨不能来这(blog),还是在这里谢谢一下!因为给了我一个laptop,呵呵！真是不错啊！
也没啥说的了，再谢一下支持我oi的人。
祝所有为OI而奋斗的OIer取得好成绩！！
虽然很早就会使用qosrt了，在使用的过程中也没有任何问题，今天发现还是有很大问题的，在这里集中说一下
1.最原始的代码:
procedure quicksort(var b:arr; s,t:integer);
var i,j,x,t1:integer;
begin
i:=s;j:=t;x:=b[i];
repeat
while (b[j]>=x) and (j>i) do j:=j-1;
if j>i then begin t1:=b[i]; b[i]:=b[j];b[j]:=t1;end;
while (b[i]<=x) and (i<j) do i:=i+1;
if i<j then begin t1:=b[j];b[j]:=b[i];b[i]:=t1; end
until i=j;
b[i]:=x;
i:=i+1;j:=j-1;
if s<j then quicksort(b,s,j);
if i<t then quicksort(b,i,t);
end;
——————————————-
2.我经常使用的代码:
procedure qsort(s,t:longint);
var i,j,x:longint;
begin
i:=s;j:=t;x:=a[i];
repeat
while (i<j)and(x<=a[j])do dec(j);
if i<j then begin
a[i]:=a[j];
inc(i);
end;
while (i<j)and(a[i]<=x)do inc(i);
if i<j then begin
a[j]:=a[i];
dec(j);
end;
until i=j;
a[i]:=x;
if s<i-1 then qsort(s,t-1);
if i+1<t then qsort(i+1,t);
end;
——————————————-
3.这个是今天lccycc给我的qsort代码，相当快了,正常可以过50W的数据,而且我也过了,但是再测就不好使了,30W过的比较轻松!
而且据我观察比C++的qsort快,比STL的sort还快,估计是C++文件操占用的比较多作看来pascal也不一定什么都比C差,^_^
procedure sqort(l,h:longint);
var i,j,k,code:longint;
begin
i:=l;j:=h;k:=a[(l+h) div 2];
while I<j do
begin
while a[i]<k do inc(i);
while a[j]>k do dec(j);
if i<=j then
begin
code:=a[i];a[i]:=a[j];a[j]:=code;
inc(i);dec(j);
end;
end;
if i<h then sqort(i,h);
if j>l then sqort(l,j);
end;
原来一个简单的快排有这么大的区别，程序是否垃圾也其了很大影响，但是编程水平不是一朝一夕就可以成就的，以后要注意!!