olimp1.dpr

program Project2;


var
    c: char;
   f: text;
  a,rem1,rem2: integer;
begin
 assign(f, 'nine.in');
  reset(f);

  rem1 := 0;
  while not eoln(f) do
  begin
    read(f, c);
    rem1 := (rem1 + ord(c) - ord('0')) mod 9;
  end;
  readln(f);


   rem2 := 0;
  while not eoln(f) do
  begin
    read(f, c);
    rem2 := (rem2 + ord(c) - ord('0')) mod 9;
  end;
  readln(f);

  a := rem1 * rem2;
  close(f);
  assign(f, 'nine.out');
  rewrite(f);
  if a mod 9 = 0 then
    write(f, 'YES')
  else
    write(f, 'NO');
  close(f);
end.