【题意】
t条路,问从s到e经过n条边的最小路程
【输入】
第一行n、t、s、e
接下来t行为边的长度、边的两个端点编号
【输出】
从s到e经过n条边最小路程
做flyod,本身需要枚举n次,基于快速幂思想加速
需要注意的是评测网站和noi的pascal内核都为2.0.4
递归很容易溢出
program poj3613;
type
arr=array [0..201,0..201] of int64;
var
n,t,i,j,k,s,e,tot,all:longint;
dl,map,u,v,c:array [0..10001] of longint;
dis,root,temp,p:arr;
function min (a,b:int64):int64;
begin
if a<b then exit(a)
else......
阅读全文