记录编号	119852	评测结果	AAAAAAAAAA
题目名称	矩阵游戏	最终得分	100
用户昵称	传奇	是否通过	通过
代码语言	Pascal	运行时间	0.016 s
提交时间	2014-09-14 16:52:34	内存使用	4.30 MiB

program cojs459;
var
  a,b,c:array[0..600,0..600] of longint;
  i,j,k,m,n:longint;
  k1,k2:int64;
begin
  assign(input,'matrixgame.in');
  assign(output,'matrixgame.out');
  reset(input);
  rewrite(output);

  readln(n,m);
  k:=0;
  for i:=1 to n do
    for j:=1 to m do
    begin
      read(a[i,j]);
      inc(k,a[i,j]);
      inc(b[i,j],b[i,j-1]+a[i,j]);
      inc(c[i,j],c[i-1,j]+a[i,j]);
    end;
  for i:=1 to n-1 do
    begin
      k1:=0; k2:=0;
      for j:=1 to i do
        k1:=k1+b[j,m];
      for j:=i+1 to n do
        k2:=k2+b[j,m];
      k1:=(k1*k2) div (m*n*5);
      if k1>k then
    k:=k1;
    end;


  for i:=1 to m-1 do
    begin 
      k1:=0; k2:=0;
      for j:=1 to i do
        k1:=k1+c[n,j];
      for j:=i+1 to m do
        k2:=k2+c[n,j];
      k1:=(k1*k2) div (m*n*5);
      if k1>k then
        k:=k1;
    end;

  writeln(k);

  close(input);
  close(output);
end.