平均时间最短即总时间最短
首先不难想到，将每个工作人员拆成n个点
然后，我就卡住了，
的确，正向建图确实很难，因为我们不好表示在修第i个车之前，前面用了多少时间
于是我们应该逆向想一想，将这辆车作为某个工作人员倒数第k个修的车会对之后的时间做怎样的影响
显然，每个工作人员修车是相对独立的
也就是说，工作人员i倒数第k个修车j时对后续他修的车时间影响总和是time[i,j]*k
于是，每个工作人员拆成的n个点意义就明确了；
图就好建了；
当然，这是一个二分图，可以KM，可以最小费用最大流，
作为不会KM的弱渣，我就用最小费用最大流吧
const inf=;
type node=record
next,flow,cost,from,point:longint;
end;
var edge:array[..] of node;
q:array[..] of longint;
a:array[..,..] of longint;
pre,d,p:array[..] of longint;
v:array[..] of boolean;
ans,len,t,n,m,x,i,j,k:longint; procedure add(x,y,f,w:longint);
begin
inc(len);
edge[len].from:=x;
edge[len].point:=y;
edge[len].flow:=f;
edge[len].cost:=w;
edge[len].next:=p[x];
p[x]:=len;
end; function spfa:boolean;
var f,r,x,y,i:longint;
begin
for i:= to t do
d[i]:=inf;
d[]:=;
fillchar(v,sizeof(v),false);
v[]:=true;
f:=;
r:=;
q[]:=;
while f<=r do
begin
x:=q[f];
v[x]:=false;
i:=p[x];
while i<>- do
begin
y:=edge[i].point;
if edge[i].flow> then
begin
if d[y]>d[x]+edge[i].cost then
begin
d[y]:=d[x]+edge[i].cost;
pre[y]:=i;
if not v[y] then
begin
v[y]:=true;
inc(r);
q[r]:=y;
end;
end;
end;
i:=edge[i].next;
end;
inc(f);
end;
if d[t]>=inf then exit(false) else exit(true);
end; procedure mincost;
var i,j:longint;
begin
while spfa do
begin
i:=t;
while i<> do
begin
j:=pre[i];
dec(edge[j].flow);
inc(edge[j xor ].flow);
i:=edge[j].from;
end;
ans:=ans+d[t];
end;
end; begin
readln(m,n);
len:=-;
fillchar(p,sizeof(p),);
for i:= to n do
begin
for j:= to m do
read(a[i,j]);
readln;
end;
for i:= to n do
begin
add(,m*n+i,,);
add(m*n+i,,,);
end;
t:=m*n+n+;
for i:= to m do
begin
for j:= to n do
begin
add((j-)*m+i,t,,);
add(t,(j-)*m+i,,);
end;
for j:= to n do
for k:= to n do
begin
x:=a[j,i]*(n-k+);
add(j+m*n,i+(k-)*m,,x);
add(i+(k-)*m,j+m*n,,-x);
end;
end;
mincost;
writeln(ans/n::);
end.