let f m =
    let t = 2017%m
    let rec iter n r = if n>1 then iter (n-1) ((r*t)%m) else (t+r)%m
    iter (2*2017) t
    
(stdin.ReadLine >> int) () |> f |> printfn "%d"