- 博客(16)
- 收藏
- 关注
RSS订阅原创 PKU2603 brave ballonists
<br />这道题的大意是，十个数相乘，求所得积的约数个数。但是，它考察的显然不是高精度计算，而是约数个数定理。对于一个数a，如果我们有：<br />a=(p1^k1)* (p2^k2)* (p3^k3)*……*(pn^kn)<br /> 那么a的约数个数为（k1+1）*（k2+1）*（k3+1）*……*（kn+1）<br /><br />program Brave_balloonists;const maxn=15000;var p:array[0..maxn] o
2010-11-18 21:03:00
342
原创 PKU1804 brainman
<br /> 这道题让我们模拟冒泡排序，求交换次数，本质上是求序列的逆序对个数。<br /> 我们有两种方法求解——归并排序和树状数组。<br /> <br />【归并排序】<br /> <br />program Brainman;const maxn=1005; inf=10000000; msg='Scenario #';type arr=array[0..maxn] of longint;var data:ar
2010-11-18 12:46:00
499
原创 PKU2553 the bottom of the graph
<br /> 昨天skyprophet 神牛给我讲了一句用Tarjan求强连通分量，感觉并不太难，于是试了一下。它只是在基本的DFS中添了一段话。就是对一个顶点，当我们发现他满足low=d 时，它就是一个强连通分量的顶部。我们同时需要用一个栈来维护点序列，通过出栈的方式求强连通。这个方法是线性的，时间效率高于kosaraju算法。而且它跟求桥，求割点的方法是统一的。<br /><br />program bottom;const maxn=5100;type poi
2010-11-18 11:22:00
353
原创 PKU1144 network
本题考查的是寻找割点（也叫挂接点），运用DFS执行。 每个节点我们除了需要用d来记录它的时间戳，还需要low来记录它及其后裔中最浅的反向边指向。对于一个图的割点，我们能发现如下充要条件：（1） 若u为图G搜索树的根，当且仅当u在这棵搜索树中有至少两个儿子。（2） 若u为图G搜索树的非根结点，当且仅当u有一个子节点v，使其不存在从v或v的后裔中指向u的真祖先的反向边。program network;const root=1; max
2010-11-17 17:28:00
426
原创 PKU2413 how many fibs
<br /> 学以致用，高精度题目一个！先用高精度加法预处理，接着一起二分搜索。<br /><br />program fibs;const maxlen=200; maxn=500; stop='0 0';type hightype=record num:array[0..maxlen] of longint; len:longint; end;v
2010-11-17 17:19:00
374
原创 PKU1847 tram
<br /> 这题上次做的时候居然是WA！我感到很莫名其妙。<br /> 只是一道最简单的最短路而已。对于每个顶点，与其相邻的第一个顶点权值为0，其余相邻节点的权值为1。求出从起点到终点的最短路即可！<br /><br />program tram;const inf=10000000; maxn=110; len=2000000;type pointer=^node; node=record
2010-11-16 20:51:00
413
原创 高精度运算
<br /> 今天复习了一下高精度运算。我觉得这种简单的东西也得看一看，至少给自己留点儿低！<br /> 高精度可以压位的，但我今年懒得写了……<br /> 首先是加减法很简单了，没什么值得特别强调的。高精度减法时别忘了，a<b时做下交换在计算，输出时别忘了标记负号。<br /> 高精度乘法需要注意的问题是，要在做完乘法之后再调整为十进制。有的初学者小盆友喜欢边做乘法边取模，其实这是很浪费时间的！<br /> 高精度除法我做一下讲解吧！<br />
2010-11-16 19:47:00
299
原创 PKU1172 street race
<br /> 这道题目考察搜索的一个基本应用——计算连同子图。我们采取的是试删法，一次每句每个顶点判断是否符合题意即可。<br /><br />program street_race;const maxn=100;type pointer=^node; node=record data:longint; next:pointer; end;var edge:array[0..
2010-11-16 12:41:00
361
原创 PKU1170 shopping trip
<br /> 一道极丑的背包和冲进ranklist前10的代码……我们把每件商品和每种优惠方案都看做一个有一定价值和容量的物品，直接背包问题解决之！<br /><br />program shopping_offers;const maxn=5; maxt=110; inf=10000000;type rec=record sum:array[0..maxn] of longint; cost:
2010-11-15 20:44:00
261
原创 PKU1734 sightseeing trip
<br /> 最近我跟回路干上了……<br /> 今天是一道最小回路问题。大家不难想到朴素的超时算法，那么我们应该如何优化呢？方法就是FLOYD算法。<br /> 有人对这个东西不屑一顾——因为它基础，因为它的高复杂度……但是当数据量在三位数时基本可以发挥出它的最大功力！FLOYD不仅仅是求最短路的工具，我们从它身上体会出动态规划的思想，将其应用于传递闭包，找强连通分量，求任意点对之间最短路个数，找最小回路。<br /> 找最小回路是在求得最短路之前顺便求出的
2010-11-15 17:49:00
381
原创 PKU1273 Drainage Ditches
<br /> 网络流一道！<br /> 以前回的是SAP，估计现在让我写得卡死，于是我就把从前都不屑一顾的Edmonds-Karp试了一下。不就是一顿BFS么！我估计NOIP要考什么网络流也就这水平了…用不到什么SAP啦，HLPP什么的。当然模型也会很裸！<br /><br />program ditch;const maxn=250; inf=10000000;var c:array[0..maxn,0..maxn] of longint;
2010-11-14 16:45:00
334
原创 PKU1041 John's trip
最近一直在做裸提练习…今天来一个欧拉回路。 欧拉回路的存在性判断就是看任意顶点的度数是不是均为偶数（对于有向图出入度相等）。寻找欧拉回路时使用套圈算法即可。program john_trip;const maxn=2000; maxm=1000000; msg='Round trip does not exist.';type pointer=^node; node=record x,y
2010-11-14 16:34:00
396
原创 NOTHING NEW...
NOTHING NEW... JUST SHOW YOU GUYS WHERE I FIGHT, WHERE I ENDEAVOR, WHERE I CHASE MY DREAM...
2010-11-14 15:32:00
298
原创 SPOJ0919 prime checker
马上就Noip了…最后一次，祈福中… 前一段在学校复习了搜索，动态规划和图论。从今天开始我再复习复习数论和高精度算法。 这道题是裸的miller rabin算法，所以不做讲解了，只是为了自己复习用的哈！program primecheck;const limit=1000; anum=1234567890; pnum=1 shl 31;function calc(a:int64):int64;begin
2010-11-13 16:09:00
352
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人