いくつかの haskell の質問に取り組んでいましたが、これら 2 つで行き詰まってしまいました。答えは簡単ですが、私の頭では解決できません。
3 つの引数のうちいくつが等しいかを判断する関数を作成します (つまり、0、2、または 3 のいずれかを返します)。
howManyEqual :: Int -> Int -> Int -> Int
howManyEqual x y z
| x == y && x == z && y == z = 3
|
3 つの整数引数のうち、平均値より大きいものがいくつあるかを返す関数を作成します。
howManyAboveAverage :: Int -> Int -> Int -> Int
howManyAboveAverage x y z
| x > average(x y z) && y > average(x y z) && z > average(x y z) = 3
where
average a b c = ((a + b + c) / 3)
誰かがこれらを終わらせるのを手伝ってくれませんか:)
ありがとう