var
  a, b : int64;
begin
  read(a, b);
  if b = 0
    then
      writeln(0)
  else
    begin
    while b > 0 do
    begin
      a := a * (b mod 10);
      b := b div 10;
    end;
  writeln(a);
end;
end.