open System
open System.Text

let f x =
    let champ = 
        let builder = new StringBuilder()
        for i in 1 .. 100 do builder.Append i |> ignore
        builder.ToString()
    champ.[x-1]

let D = stdin.ReadLine() |> int

f D |> stdout.WriteLine