AtCoder Beginner Contest 467

ABC初参加でした。Haskellを使用して、結果は1完。Aがなぜ通らないのか分からなすぎて時間の大半を使ってしまいました。 Bはやるだけ感あったので、時間があれば解けたかな？

main :: IO ()
main = do
  [h, w] <- map read . words <$> getLine
  putStrLn $ if round( (w / ((h/100) ^2)) * 10 ) `div` 10 >= 25 then "Yes" else "No"

当面の目標は