数字统计

自我介绍
大家好，我叫刘嘟嘟，也可以叫我刘嘎嘎，刘傻傻就算了啊。大家可以叫我嘟嘟老师。今天的嘟嘟课堂就给大家讲一道水题——数字统计。
题目描述
请统计某个给定范围[L, R]的所有整数中，数字2 出现的次数。
比如给定范围[2, 22]，数字2 在数2 中出现了1 次，在数12 中出现1 次，在数20 中出现1 次，在数21 中出现1 次，在数22 中出现2 次，所以数字2 在该范围内一共出现了6次。
输入
输入文件名为two.in。
输入共1 行，为两个正整数L 和R，之间用一个空格隔开。
输出
输出文件名为two.out。
输出共1 行，表示数字2 出现的次数。
样例输入1
2 22
样例输出1
2 100
样例输出1
20
数据范围限制
1 ≤ L ≤ R≤ 10000。
思路
这道题可以用我最喜欢的一个汉字来概括：水！！！谁的不要不要的。直接暴力搞一下，直接双重循环搞事情，从L到R的数变成字符串，然后每一位判断是不是2就行了。这道题很符合我的性格，我最二，我最二，yeah！
往下翻是代码。
激动人心的时候到了……
代码
var
i,j,l,r,ans:longint;
s:string;
begin
assign(input,’two.in’);reset(input);
assign(output,’two.out’);rewrite(output);
readln(l,r);
for i:=l to r do
begin
str(i,s);
for j:=1 to length(s) do
if (s[j]=’2’) then inc(ans);
end;
write(ans);
close(input);
close(output);
end.