var i,j,k,l,m,n,o,p,q:longint;
begin
// assign(input,'two.in');reset(input);
// assign(output,'two.out');rewrite(output);
readln(m,n);
p:=0;
for i:=m to n do
begin
o:=i;
while o<>0 do
begin
if o mod 10=2 then p:=p+1;
o:=o div 10;
end;
end;
writeln(p);
// close(input);close(output);
end.
/**************************************************************
Problem: 2292
User: admin
Language: Pascal
Result: Wrong Answer
****************************************************************/