题层一 楼
( floor. .* * )
【问题描述】
mxy 感觉新世界的大门打开了。
ta 决定要在新世界的旅馆中找间房住。已知新世界每天都有一个高能的数字 t,这个数字在楼层中是不会出现的。我们以 t=3 为例,则 3,13,31,33 等楼层是不存在的,楼层编号为 1,2,4,5……,所以实际上的 4 楼才是 3 楼。
已知 mxy 订了编号为 m 层的房间,并且当天高能数字是 t,现在 ta 想知道 ta 的房间真实楼层是多少。(保证 m 对 t 合法)
【输入】
一行 2 个整数 m 和 t。(1≤m≤100000,0≤t≤9)
【输出】
一行一个整数,表示真实楼层。
【输入输出样例】
floor.in
14 3
floor.out
12
var
ans,i,j,m,k,n:longint;
function aa(x:longint):boolean;
var
i,j:longint;
s:string;
s1:ansistring;
begin
aa:=false;
str(x,s1);
str(m,s);
for i:=1 to length(s1) do
begin
if s1[i]=s[1] then
begin
exit(true);
end;
end;
end;
begin
assign(input,'floor.in'); reset(input);
assign(output,'floor.out'); rewrite(output);
readln(n,m);
for i:=1 to n do
begin
if aa(i)
then inc(ans)
end;
writeln(n-ans);
close(input);
close(output);
end.