main = do
  li <- getLine
  let [a,b,n] = map read $ words li
  let ans = compute a b n
  print ans

compute :: Int -> Int -> Int -> Int
compute a b n
  | b <= n = a * (b-1) `div` b
  | True   = a * n `div` b
