提出 #497297

ソースコード 拡げる

import Data.Monoid
import Data.Foldable (foldMap)
main = getContents >>= print . getSum . foldMap (Sum . fromEnum . elem 'r') . lines

提出情報

提出日時
問題 B - カキ
ユーザ fumieval
言語 Haskell (Haskell Platform 2014.2.0.0)
得点 100
コード長 135 Byte
結果 AC
実行時間 84 ms
メモリ 1424 KiB

ジャッジ結果

セット名 Sample All
得点 / 配点 0 / 0 100 / 100
結果
AC × 2
AC × 22
セット名 テストケース
Sample subtask0_sample_01.txt, subtask0_sample_02.txt
All subtask0_sample_01.txt, subtask0_sample_02.txt, subtask1_01.txt, subtask1_02.txt, subtask1_03.txt, subtask1_04.txt, subtask1_05.txt, subtask1_06.txt, subtask1_07.txt, subtask1_08.txt, subtask1_09.txt, subtask1_10.txt, subtask1_11.txt, subtask1_12.txt, subtask1_13.txt, subtask1_14.txt, subtask1_15.txt, subtask1_16.txt, subtask1_17.txt, subtask1_18.txt, subtask1_19.txt, subtask1_20.txt
ケース名 結果 実行時間 メモリ
subtask0_sample_01.txt AC 84 ms 1240 KiB
subtask0_sample_02.txt AC 29 ms 1296 KiB
subtask1_01.txt AC 29 ms 1300 KiB
subtask1_02.txt AC 33 ms 1232 KiB
subtask1_03.txt AC 30 ms 1300 KiB
subtask1_04.txt AC 29 ms 1248 KiB
subtask1_05.txt AC 27 ms 1312 KiB
subtask1_06.txt AC 28 ms 1300 KiB
subtask1_07.txt AC 29 ms 1304 KiB
subtask1_08.txt AC 29 ms 1304 KiB
subtask1_09.txt AC 29 ms 1312 KiB
subtask1_10.txt AC 30 ms 1304 KiB
subtask1_11.txt AC 30 ms 1296 KiB
subtask1_12.txt AC 28 ms 1300 KiB
subtask1_13.txt AC 30 ms 1424 KiB
subtask1_14.txt AC 30 ms 1312 KiB
subtask1_15.txt AC 29 ms 1308 KiB
subtask1_16.txt AC 28 ms 1212 KiB
subtask1_17.txt AC 31 ms 1252 KiB
subtask1_18.txt AC 31 ms 1296 KiB
subtask1_19.txt AC 31 ms 1300 KiB
subtask1_20.txt AC 31 ms 1244 KiB