BANGSO PAS

const   fin='bangso.inp';   fon='bangso.out';
       maxn=1000;

var    a,f:array[0..maxn,0..maxn] of int64;
       m,n:longint;
    s,max:int64;

procedure nhap;
var i,j:longint;
begin
    readln(m,n);
    for i:=1 to m do
    begin
           for j:=1 to n do read(a[i,j]);
        readln;
    end;
end;

procedure tinh_f;
var i,j:longint;
begin
    for i:=1 to m do
        for j:=1 to n do
              f[i,j]:=f[i-1,j]+f[i,j-1]-f[i-1,j-1]+a[i,j];
end;

function tong(x1,y1,x2,y2:longint):int64;
begin
    exit(F[x2,y2]-f[x1-1,y2]-f[x2,y1-1]+F[x1-1,y1-1]);
end;
procedure giai;
var
   x1,y1,x2,y2,imax,jmax:longint;
begin
    max:=0;
    for x1:=1 to m-2 do
           for y1:=1 to n-2 do
        begin
            x2:=x1+2;
            y2:=y1+2;
            s:=tong(x1,y1,x2,y2);
              if s> max then
            begin
                imax:=x1;
                jmax:=y1;
                max:=s;
            end;
        end;
    writeln(max);
    writeln(imax,' ',jmax);
end;

begin
    assign(input,fin);reset(input);
    assign(output,fon);rewrite(output);
    nhap;
    tinh_f;
    giai;
    close(input);close(output);
end.