Kortit

input/code.hs:1:1: warning: [-Wmissing-signatures]
    Top-level binding with no type signature: main :: IO ()
  |
1 | main = interact $ (\x -> if x > 26 then "YES" else if x > 1 then "MAYBE" else "NO") . read . head . words
  | ^^^^

input/code.hs:1:29: warning: [-Wtype-defaults]
    * Defaulting the following constraints to type `Integer'
        (Ord a0) arising from a use of `>' at input/code.hs:1:29-34
        (Num a0) arising from the literal `26' at input/code.hs:1:33-34
        (Read a0) arising from a use of `read' at input/code.hs:1:87-90
    * In the expression: x > 26
      In the expression:
        if x > 26 then "YES" else if x > 1 then "MAYBE" else "NO"
      In the first argument of `(.)', namely
        `(\ x
            -> if x > 26 then "YES" else if x > 1 then "MAYBE" else "NO")'
  |
1 | main = interact $ (\x -> if x > 26 then "YES" else if x > 1 then "MAYBE" else "NO") . read . head . words
  |                             ^^^^^^

main = interact $ (\x -> if x > 26 then "YES" else if x > 1 then "MAYBE" else "NO") . read . head . words

Test 1

Verdict: ACCEPTED

Test 2

Verdict: ACCEPTED

Test 3

Verdict: ACCEPTED

Test 4

Verdict: ACCEPTED

Test 5

Verdict: ACCEPTED

Test 6

Verdict: ACCEPTED