var a,b,c,d,i,x:longint;
begin
read(a,b);
for i:=a to b do
begin
c:=i mod 10;
d:=i div 100;
if c=d then begin writeln(i);inc(x);end;
end;
write(x);
end.
/**************************************************************
	Problem: 1742
	User: admin
	Language: Pascal
	Result: Wrong Answer
****************************************************************/