[NOIP2010] (普及组) 数字统计

NOIP2010 数字统计

时间限制: 1 Sec 内存限制: 128 MB

题目描述

请统计某个给定范围[L, R]的所有整数中，数字 2 出现的次数。
比如给定范围[2, 22]，数字 2 在数2中出现了 1次，在数 12中出现 1 次，在数 20 中出现 1 次，在数 21 中出现 1 次，在数 22 中出现 2 次，所以数字 2 在该范围内一共出现了 6次。

输入

输入共 1 行，为两个正整数 L 和 R，之间用一个空格隔开。1 ≤ L ≤R≤ 10000。

输出

输出共 1 行，表示数字 2 出现的次数。

样例输入

2 22

样例输出

6

（NOIP 2011 D1 T2 卡了好久，所以果断水道题来安慰自己…….）

var
 a:string;
 x,y,l,r:longint;
 i,j,k,ans:longint;
begin
 readln(l,r);
 ans:=0;
 for i:=l to r do
  begin
   str(i,a);
   for j:=1 to length(a) do
    if a[j]='2'
    then inc(ans);
  end;
 writeln(ans);
end.