$D=<>; $S=join('',1..55); print(substr($S,$D-1,1),"\n");