原创 poj1703Find them catch them
Find them, Catch them Time Limit: 1000MS Memory Limit: 10000K Total Submissions: 26679 Accepted: 8090 Descrip
2020-06-01 15:39:04
原创 A Bug's Life -Poj
原文地址：A Bug's Life -Poj作者：蘭多夫87A Bug's Life Time Limit: 10000MS Memory Limit: 65536K Total Submissions: 25599 Accepted:
2020-06-01 15:39:04
原创 poj1160post office{動態規劃…
var v,p,i,j,pos:longint; x:array[1..300] of longint; w:array[1..300,1..300] of longint; f:array[1..300,0..30]
2020-06-01 15:39:04
1
原创 poj2492 A bug's life{種類並查集}
A Bug's Life Time Limit: 10000MS Memory Limit: 65536K Total Submissions: 25605 Accepted: 8334 Description Backg
2020-06-01 15:39:04
原创 代碼框 的代碼
<pre style="padding: 9.5px; font-family: Monaco, Menlo, Consolas, 'Courier new', monospace; font-size: 13px; color: r
2020-06-01 15:39:04
原创 數學定理{摘自 百度}{important}
{突然間在百度百科上發現了N多定理，先跟大家分享一下} 15定理 ▪ 2π定理 ▪ Sun-Ni定理 ▪ Vizing定理 ▪ 阿貝爾定理 ▪ 阿貝爾二項式定理 ▪ 阿貝爾-魯菲尼定理 ▪ 阿貝爾曲線定理 ▪ 阿達馬三圓定理 ▪
2020-06-01 15:38:54
1
原创 2253Frogger{dijkstra思想應用}{AC…
var n,count:longint; x,y:array[1..200] of longint; w:array[1..200,1..200] of real; f:array[1..200] of real;
2020-02-20 16:13:44
4
原创 1548 Robots{偏序集}{WA求解}
var a,b,n:longint; x,y:array[1..600] of longint; f:array[1..600] of longint; procedure swap(var a,b:longint); v
2020-02-20 16:13:29
2
原创 帶權中位數
D[i]爲每個點的權值，則此時的中位數是trunc(∑D[i]/2)這個數 1：計算總的權值和，初始左邊總權值爲0； 2：當前點T從1開始算起 3：若左邊總權值+當前點的權值<總人數的一半，則轉4，否則轉5 4：則把當前點的權值累
2020-02-20 16:13:29
原创 數的直徑{摘自 百度文庫}
1。我們用a～b表示樹中任意兩個結點a,b之間的唯一路徑，a～b之間可以有0個或多個結點 ；用x \in a～b表示結點x處於路徑a,b上，即存在形如a～x～b的路徑（這裏x可以和a或b 重合）；用符號a-b表示a,b直接相鄰。 2
2020-02-20 16:13:29
原创 擴展歐幾里得{計算最大公約數的線…
分析見《NOI導刊》第57期 var a,b,x,y:longint; function extendedeuclid(a,b:longint; varx,y:longint):longint; var t:longint;
2020-02-20 16:13:29
3
原创 歸併排序{nlogn}
var n,i:longint; a,temp:array[1..100000] oflongint;{不要忘了設temp數組，要不然很悲劇} procedure merge(l,m,r:longint); var i,j,
2020-02-20 16:13:29
原创 逆序對數{nlogn,歸排}
var n,i:longint; ans:int64; a,temp:array[1..100000] of longint; procedure merge(l,m,r:longint); var i,j,k:long
2020-02-20 16:13:28
2
原创 1200同餘方程{擴展歐幾里得}
var a,b,x,y,d,e:longint; function extendedeuclid(a,b:longint;varx,y:longint):longint; var t:longint; begin if b=
2020-02-20 16:13:28
2
原创 霍納法則{計算多項式的值}
{必修三學過的，但是一直沒打過，這是很好的技巧哦} var i,n,x,ans:longint; a:array[1..100] of longint;{a[1],a[2],a[n]分別爲最高次項係數，次高。。。常數項} beg
2020-02-20 16:13:28
4