这道题真的不难,但是细节挺多(具体见程序)题目本身而言,显然是个费用流模型(或者写KM) type node=record point,next,flow,cost:longint; end; ..] of longint; v:..] of boolean; q:..] of longint; edge:..] of node; a:..,..] of longint; na:..] ]; t,n,i,len,j,k:longint; ef:boolean; s:string; ch:char…