var
  a : array [1..2,1..3] of longint;
  i,j,sum,n,m : longint;
begin
  readln(n);
  readln(m);
  for i:=1 to n do
    for j:=1 to m do
    readln(a[i,j]);
  for i:=1 to n do
    for j:=1 to m do
  sum:=sum+a[i,j];
  writeln(sum);
end.