program MaxMultipleOf3;
var
  M, N, i, j, val, maxVal: integer;
  found: boolean;
begin
  readln(M, N);
  maxVal := -MaxInt;
  found := false;
 
  for i := 1 to M do
    for j := 1 to N do
    begin
      read(val);
      if (val mod 3 = 0) and ((not found) or (val > maxVal)) then
      begin
        maxVal := val;
        found := true;
      end;
    end;
 
  if found then
    writeln('Наибольшее число, кратное 3: ', maxVal)
  else
    writeln('Чисел, кратных 3, нет');
end.

cHJvZ3JhbSBNYXhNdWx0aXBsZU9mMzsKdmFyCiAgTSwgTiwgaSwgaiwgdmFsLCBtYXhWYWw6IGludGVnZXI7CiAgZm91bmQ6IGJvb2xlYW47CmJlZ2luCiAgcmVhZGxuKE0sIE4pOwogIG1heFZhbCA6PSAtTWF4SW50OwogIGZvdW5kIDo9IGZhbHNlOwoKICBmb3IgaSA6PSAxIHRvIE0gZG8KICAgIGZvciBqIDo9IDEgdG8gTiBkbwogICAgYmVnaW4KICAgICAgcmVhZCh2YWwpOwogICAgICBpZiAodmFsIG1vZCAzID0gMCkgYW5kICgobm90IGZvdW5kKSBvciAodmFsID4gbWF4VmFsKSkgdGhlbgogICAgICBiZWdpbgogICAgICAgIG1heFZhbCA6PSB2YWw7CiAgICAgICAgZm91bmQgOj0gdHJ1ZTsKICAgICAgZW5kOwogICAgZW5kOwoKICBpZiBmb3VuZCB0aGVuCiAgICB3cml0ZWxuKCfQndCw0LjQsdC+0LvRjNGI0LXQtSDRh9C40YHQu9C+LCDQutGA0LDRgtC90L7QtSAzOiAnLCBtYXhWYWwpCiAgZWxzZQogICAgd3JpdGVsbign0KfQuNGB0LXQuywg0LrRgNCw0YLQvdGL0YUgMywg0L3QtdGCJyk7CmVuZC4=