2015-05-16から1日間の記事一覧

AtCoder Regular Contest 039

A - A - B problem 3桁固定だと愚直に解ける。 main :: IO () main = getContents >>= print . solve . words solve :: [String] -> Int solve [ a@[ a0, a1, a2 ] , b@[ b0, b1, b2 ] ] = maximum [ read a' - read b' | (a', b') <- concat $ [ [ ([ k, a1…