sothun

uses crt;
var n,i:longint;
   xau,st:ansistring;
begin
clrscr;
  readln(n);
   for i:=1 to n do
     begin
        str(i,st);
        xau:=xau+st;
     end;
   writeln(xau[n]);
readln;
end.