let _ =
  let n = Scanf.scanf "%d\n" (fun x -> x) in
  let rec debt x n =
    if n = 0 then x
    else let nx = x * 1050 in
         if nx mod 1000 = 0 then debt (nx / 1000) (n - 1)
         else debt (nx / 1000 + 1) (n-1) in
  Printf.printf "%d\n" ((debt 100 n) * 1000)