MDIGITS2 - First Number
Tác giả: skyvn97
Ngôn ngữ: Pascal
var
n:longint;
s,t:ansistring;
i:longint;
begin
readln(n);
s:='';
for i:=1 to n do
begin
str(i,t);
s:=s+t;
end;
str(n,t);
write(pos(t,s));
end.