记录编号	75132	评测结果	AAAAAAAAAA
题目名称	[NOIP 2010PJ]数字统计	最终得分	100
用户昵称	(⊙o⊙)…	是否通过	通过
代码语言	Pascal	运行时间	0.007 s
提交时间	2013-10-27 11:09:57	内存使用	0.17 MiB

program two;
var
  l,r:1..10000;
  i,j,h,c:longint;
  s:string;
begin
  assign(input,'twoj.in');
  assign(output,'twoj.out');
  reset(input);
  rewrite(output);
  readln(l,r);
  c:=0;
  for i:=l to r do
    begin
      str(i,s);
      h:=length(s);
      for j:=1 to h do
        if s[j]='2'
          then c:=c+1;
    end;
  writeln(c);
  close(input);
  close(output);
end.