提出 #546761

ソースコード 拡げる

import Control.Applicative
import qualified Data.List as L

d =map (\x -> read x :: Int)

main :: IO ()
main = do
    l <-  d <$> ( words <$> getLine)
    rooms <-  L.sort <$> d <$> ( words <$> getLine)
    guests <- L.sort <$> d <$> ( words <$> getLine)
    let (n:m:[]) = l
    if  n <  m 
    then putStrLn "NO"
    else solve rooms guests


solve r g =   zip' r g

zip' [] [] = putStrLn "YES"
zip' (r:rs) (g:gs) = if r < g
                     then putStrLn "NO"
                     else zip' rs gs

提出情報

提出日時
問題 C - 旅館
ユーザ keizo_bookman
言語 Haskell (Haskell Platform 2014.2.0.0)
得点 0
コード長 526 Byte
結果 WA
実行時間 2039 ms
メモリ 56324 KiB

ジャッジ結果

セット名 Sample Dataset1 Dataset2
得点 / 配点 0 / 0 0 / 60 0 / 40
結果
AC × 3
WA × 1
AC × 26
WA × 3
AC × 45
WA × 9
TLE × 1
セット名 テストケース
Sample 0-sample-1.txt, 0-sample-2.txt, 0-sample-3.txt, 0-sample-4.txt
Dataset1 0-sample-1.txt, 0-sample-2.txt, 0-sample-3.txt, 0-sample-4.txt, 1-max-0.txt, 1-max-1.txt, 1-max-2.txt, 1-max-3.txt, 1-max-4.txt, 1-random-00.txt, 1-random-01.txt, 1-random-02.txt, 1-random-03.txt, 1-random-04.txt, 1-random-05.txt, 1-random-06.txt, 1-random-07.txt, 1-random-08.txt, 1-random-09.txt, 1-random-10.txt, 1-random-11.txt, 1-random-12.txt, 1-random-13.txt, 1-random-14.txt, 1-random-15.txt, 1-random-16.txt, 1-random-17.txt, 1-random-18.txt, 1-random-19.txt
Dataset2 0-sample-1.txt, 0-sample-2.txt, 0-sample-3.txt, 0-sample-4.txt, 1-max-0.txt, 1-max-1.txt, 1-max-2.txt, 1-max-3.txt, 1-max-4.txt, 1-random-00.txt, 1-random-01.txt, 1-random-02.txt, 1-random-03.txt, 1-random-04.txt, 1-random-05.txt, 1-random-06.txt, 1-random-07.txt, 1-random-08.txt, 1-random-09.txt, 1-random-10.txt, 1-random-11.txt, 1-random-12.txt, 1-random-13.txt, 1-random-14.txt, 1-random-15.txt, 1-random-16.txt, 1-random-17.txt, 1-random-18.txt, 1-random-19.txt, 2-max-0.txt, 2-max-1.txt, 2-max-2.txt, 2-max-3.txt, 2-max-4.txt, 2-max-5.txt, 2-random-00.txt, 2-random-01.txt, 2-random-02.txt, 2-random-03.txt, 2-random-04.txt, 2-random-05.txt, 2-random-06.txt, 2-random-07.txt, 2-random-08.txt, 2-random-09.txt, 2-random-10.txt, 2-random-11.txt, 2-random-12.txt, 2-random-13.txt, 2-random-14.txt, 2-random-15.txt, 2-random-16.txt, 2-random-17.txt, 2-random-18.txt, 2-random-19.txt
ケース名 結果 実行時間 メモリ
0-sample-1.txt WA 31 ms 1036 KiB
0-sample-2.txt AC 28 ms 1028 KiB
0-sample-3.txt AC 27 ms 1032 KiB
0-sample-4.txt AC 29 ms 1164 KiB
1-max-0.txt AC 30 ms 1588 KiB
1-max-1.txt AC 30 ms 1556 KiB
1-max-2.txt AC 30 ms 1544 KiB
1-max-3.txt AC 28 ms 1548 KiB
1-max-4.txt AC 29 ms 1552 KiB
1-random-00.txt AC 25 ms 1048 KiB
1-random-01.txt AC 30 ms 1600 KiB
1-random-02.txt AC 25 ms 1048 KiB
1-random-03.txt AC 27 ms 1556 KiB
1-random-04.txt AC 27 ms 1304 KiB
1-random-05.txt AC 28 ms 1564 KiB
1-random-06.txt WA 29 ms 1168 KiB
1-random-07.txt AC 28 ms 1040 KiB
1-random-08.txt AC 28 ms 1088 KiB
1-random-09.txt AC 28 ms 1032 KiB
1-random-10.txt WA 27 ms 1516 KiB
1-random-11.txt AC 27 ms 1084 KiB
1-random-12.txt AC 27 ms 1048 KiB
1-random-13.txt AC 25 ms 1052 KiB
1-random-14.txt AC 25 ms 1048 KiB
1-random-15.txt AC 29 ms 1656 KiB
1-random-16.txt AC 26 ms 1096 KiB
1-random-17.txt AC 25 ms 1048 KiB
1-random-18.txt AC 27 ms 1068 KiB
1-random-19.txt AC 27 ms 1088 KiB
2-max-0.txt AC 1874 ms 56204 KiB
2-max-1.txt AC 1868 ms 56272 KiB
2-max-2.txt AC 1856 ms 56324 KiB
2-max-3.txt AC 1880 ms 56200 KiB
2-max-4.txt TLE 2039 ms 55168 KiB
2-max-5.txt AC 1863 ms 56204 KiB
2-random-00.txt AC 128 ms 19344 KiB
2-random-01.txt AC 187 ms 35844 KiB
2-random-02.txt WA 1396 ms 49052 KiB
2-random-03.txt AC 187 ms 35916 KiB
2-random-04.txt AC 720 ms 25480 KiB
2-random-05.txt WA 594 ms 22412 KiB
2-random-06.txt WA 637 ms 24452 KiB
2-random-07.txt AC 44 ms 5520 KiB
2-random-08.txt AC 193 ms 36132 KiB
2-random-09.txt WA 941 ms 31632 KiB
2-random-10.txt AC 72 ms 10128 KiB
2-random-11.txt AC 122 ms 19336 KiB
2-random-12.txt AC 1673 ms 53280 KiB
2-random-13.txt AC 124 ms 19340 KiB
2-random-14.txt WA 344 ms 13196 KiB
2-random-15.txt AC 43 ms 5612 KiB
2-random-16.txt AC 117 ms 19356 KiB
2-random-17.txt WA 743 ms 26512 KiB
2-random-18.txt AC 108 ms 18636 KiB
2-random-19.txt AC 561 ms 21772 KiB