結果
| 問題 | No.188 HAPPY DAY | 
| コンテスト | |
| ユーザー |  | 
| 提出日時 | 2018-01-08 19:16:35 | 
| 言語 | Haskell (9.10.1) | 
| 結果 | 
                                CE
                                 
                            (最新) 
                                AC
                                 
                            (最初) | 
| 実行時間 | - | 
| コード長 | 251 bytes | 
| コンパイル時間 | 4,952 ms | 
| コンパイル使用メモリ | 147,456 KB | 
| 最終ジャッジ日時 | 2024-12-31 06:48:34 | 
| 合計ジャッジ時間 | 5,553 ms | 
| ジャッジサーバーID (参考情報) | judge1 / judge3 | 
(要ログイン)
コンパイルエラー時のメッセージ・ソースコードは、提出者また管理者しか表示できないようにしております。(リジャッジ後のコンパイルエラーは公開されます)
ただし、clay言語の場合は開発者のデバッグのため、公開されます。
            
            
            
            
            ただし、clay言語の場合は開発者のデバッグのため、公開されます。
コンパイルメッセージ
Loaded package environment from /home/judge/.ghc/x86_64-linux-9.8.2/environments/default
[1 of 2] Compiling Main             ( Main.hs, Main.o )
Main.hs:1:1: error: [GHC-87110]
    Could not load module ‘Data.Time.Calendar’.
    It is a member of the hidden package ‘time-1.12.2’.
    Use -v to see a list of the files searched for.
  |
1 | import Data.Time.Calendar
  | ^^^^^^^^^^^^^^^^^^^^^^^^^
            
            ソースコード
import Data.Time.Calendar
main :: IO ()
main = do
  print solve
solve :: Int
solve = length $ filter f ls
  where
    ls = map toGregorian [fromGregorian 2015 1 1 .. fromGregorian 2015 12 31]
    f (_, m, d) = m == let (t, o) = divMod d 10 in t + o
            
            
            
        