function F(a: integer) := a.ToString.Length;

begin
var a := ReadInteger();
var b := ReadInteger();
Print(F(a) > F(b) ? $'в числе {a} цифр больше' :
F(b) > F(a) ? $'в числе {b} цифр больше' :
$'в числах {a} и {b} цифр поровну')
end.