main::IO()
main = do
  n100 <-fmap read getLine
  n025 <-fmap read getLine
  n001 <-fmap read getLine
  let sumMoneyMod1000 = (n100 *100 + n025 *25 + n001) `mod` 1000
      n100af = sumMoneyMod1000 `div` 100
      n025af = (sumMoneyMod1000 - n100af *100) `div` 25
      n001af = sumMoneyMod1000 - n100af * 100 - n025af * 25
  print $ n100af + n025af + n001af