sumDiffAvg :: Int -> Int -> (Int, Int, Double)
sumDiffAvg x y = (x + y, x - y, fromIntegral (x + y) / 2)