ACM/ICPC
文章平均质量分 55
neupioneer
这个作者很懒,什么都没留下…
展开
-
九连环算法(pascal)递归实现
program jlh(input,output); VAR k,s,i,j,total:integer; PROCEDURE move(n:integer;VAR s:integer); VAR j,i:integer; BEGIN IF (n=1) OR (n=2) THEN s:=s+1 ELSE BEGIN F原创 2004-09-23 18:32:00 · 909 阅读 · 0 评论 -
列一下浙大的计算几何题目
五一之前要做完1032 需要了解一个公式1081 经典,判点是否在多边形内,推荐1128 矩形并的面积(其实不算是计算几何)1158 比较麻烦的计算几何+图论1193 不错的也很基础的计算几何,推荐1199 基础,不过好像精度容易出问题1280 基础1296 强烈推荐,向量旋转1377 类似凸包,推荐1453 凸包1465 凸包,推荐1488 推荐1原创 2005-03-17 19:32:00 · 971 阅读 · 0 评论 -
29届国际大学生程序设计竞赛落下帷幕……
1 Shanghai Jiaotong University 8 1517 2 Moscow State University 7 711 3 St Petersburg Institute of Fine Mechanics and Optics 7 888 4 University of Waterloo 7 1046 5 University of Wroclaw 7 1155 6 Fuda原创 2005-04-09 19:58:00 · 727 阅读 · 0 评论 -
重新回忆2004年北京赛区网上预赛……
Northeastern University Sonnet solved 4 problems as the 58th Place...发现一个有趣的现象,blacky因为10分钟罚时排在我们后面(59th Place),结果在赛区正式比赛的时候,还是因为一点点罚时排在我们后面……Magi 3 在预赛表现不错,可是在正式比赛时候,很快过掉了简单的A,C,H,就没有动静了,rruucc 算是今年原创 2005-04-14 09:16:00 · 906 阅读 · 0 评论 -
关于欧拉路径 汉密尔顿路径 以及其他
如果给定无孤立结点图G,若存在一条路,经过图中每边一次且仅一次,这条条路称为欧拉路;若存在一条回路,经过图中每边一次且仅一次,那么该回路称为欧拉回路。存在欧拉回路的图,称为欧拉图。对于无向图G,具有一条欧拉路,当且仅当G是连通的,且有零个或两个奇数度结点。有向图G具有一条单向欧拉路,当且仅当是可达的,且每个结点入度等于出度。一个有向图G具有单向欧拉路,当且仅当是可达的,而且除两个结点外,每个结点的原创 2005-04-30 22:50:00 · 2689 阅读 · 0 评论 -
基本算法-高精度计算
五、高精度计算高精度数的定义: type hp=array[1..maxlen] of integer;1.高精度加法procedure plus ( a,b:hp; var c:hp); var i,len:integer;begin fillchar(c,sizeof(c),0); if a[0]>b[0] then len:=a[0] else len:=b[0]; for原创 2004-10-17 07:29:00 · 1392 阅读 · 3 评论 -
高精度乘法(pascal)算法实现
一、高精度乘法基本思想和加法一样。其基本流程如下: ①读入被乘数s1,乘数s2 ②把s1、s2分成4位一段,转成数值存在数组a,b中;记下a,b的长度k1,k2; ③i赋为b中的最低位; ④从b中取出第i位与a相乘,累加到另一数组c中;(注意:累加时错开的位数应是多少位 ?) ⑤i:=i-1;检测i值:小于k2则转⑥,否则转④ ⑥打印结果 例:程序下载 program chengfa;原创 2004-09-23 18:49:00 · 1146 阅读 · 1 评论 -
遗传算法简介
把计算机科学与进化论结合起来的尝试始于50年代末,但由于缺乏一种通用的编码方案,人们只能依赖变异而非交配来产生新的基因结构,故而收效甚微。到60年代中期,美国Michigan大学的John Hol-land在A.S.Fraser和H.J.Bremermann等人工作的基础上提出了位串编码技术。这种编码既适于变异操作,又适于交配(即杂交)操作,并且强调将交配作为主要的遗传操作。随后,Holland将原创 2004-09-24 20:15:00 · 3598 阅读 · 1 评论 -
基本算法-树的遍历
六、 树的遍历1.已知前序中序求后序procedure Solve(pre,mid:string); var i:integer; begin if (pre=) or (mid=) then exit; i:=pos(pre[1],mid); solve(copy(pre,2,i),copy(mid,1,i-1)); solve(copy(pre,i+1,le原创 2004-10-17 07:31:00 · 1088 阅读 · 0 评论 -
基本算法-数论
一、数论算法1.求两数的最大公约数function gcd(a,b:integer):integer; begin if b=0 then gcd:=a else gcd:=gcd (b,a mod b); end ;2.求两数的最小公倍数function lcm(a,b:integer):integer; begin if a lcm:=a; whil原创 2004-10-17 07:05:00 · 778 阅读 · 0 评论 -
基本算法-图论
二、图论算法1.最小生成树 A.Prim算法: procedure prim(v0:integer); var lowcost,closest:array[1..maxn] of integer; i,j,k,min:integer; begin for i:=1 to n do begin lowcost[i]:=cost原创 2004-10-17 07:12:00 · 1290 阅读 · 0 评论 -
基本算法-背包问题
三、背包问题*部分背包问题可有贪心法求解:计算Pi/Wi 数据结构: w[i]:第i个背包的重量; p[i]:第i个背包的价值;1.0-1背包: 每个背包只能使用一次或有限次(可转化为一次):A.求最多可放入的重量。NOIP2001 装箱问题 有一个箱子容量为v(正整数,o≤v≤20000),同时有n个物品(o≤n≤30),每个物品有一个体积 (正整数)。要求从 n 个物原创 2004-10-17 07:24:00 · 2172 阅读 · 0 评论 -
基本算法-其他
七 进制转换1任意正整数进制间的互化 除n取余2实数任意正整数进制间的互化 乘n取整3负数进制: 设计一个程序,读入一个十进制数的基数和一个负进制数的基数,并将此十进制数转换为此负 进制下的数:-R∈{-2,-3,-4,....-20}八 全排列与组合的生成1排列的生成:(1..n)procedure solve(dep:integer); var i:integer;原创 2004-10-17 07:36:00 · 894 阅读 · 0 评论 -
基本算法-排序问题
四、排序算法1.快速排序: procedure qsort(l,r:integer); var i,j,mid:integer; begin i:=l;j:=r; mid:=a[(l+r) div 2]; {将当前序列在中间位置的数定义为中间数} repeat while a[i] while a[j]>mid do dec(j);{在右半部分寻找比原创 2004-10-17 07:27:00 · 862 阅读 · 0 评论 -
pku 1080 解题报告
观察题目给出的一个最优解: AGTGATG -GTTA-G 将其从某一处切开,如果左边部分的分值不是最大,那么将其进行调整,使其分值变大,则整个解分值变大,与已知的最优矛盾。所以左边部分的分值必是最大。同理,右边也是。可见满足最优子结构的性质。考虑使用DP: 设两个DNA序列分别为s1,s2,长度分别为len1,len2,score为分值表。f[i,j]表示子串s1[1..i]和s2[1..j]的原创 2005-05-02 01:40:00 · 1257 阅读 · 1 评论