- 博客(2)
- 收藏
- 关注
原创 NOIP复习-002——最长不下降数列的两种做法
NUM.ONE 普通n2做法:var a,f:array[1..500]of longint; var i,j,k,l,m,n,max:longint; begin read(n); for i:=1 to n do read(a[i]); fillchar(f,sizeof(f),0); f[1]:=1; for i:=1 to n do for j:=1 t
2015-10-17 16:40:34 593
原创 NOIP复习-001——快速排序
var a:array[1..1000]of longint; n,i,j:longint; procedure qp(l,r:longint); var m,i,j,t:longint; begin i:=l; j:=r; m:=(i+j)div 2; repeat while a[i]>a[m] do inc(i); while a[j]<a[m] do
2015-10-14 16:48:16 788
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人