Submission #498750
Source Code Expand
module Main where import Data.List (foldl') main :: IO () main = getLine >>= print . solve . read solve :: Int -> Int solve n = foldl' (\c m -> c + length (filter (=='1') $ show m)) 0 [1..n]
Submission Info
| Submission Time | |
|---|---|
| Task | D - 1 |
| User | belliture |
| Language | Haskell (Haskell Platform 2014.2.0.0) |
| Score | 20 |
| Code Size | 203 Byte |
| Status | TLE |
| Exec Time | 2036 ms |
| Memory | 1948 KiB |
Judge Result
| Set Name | Sample | Subtask1 | Subtask2 | ||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| Score / Max Score | 0 / 0 | 20 / 20 | 0 / 80 | ||||||||||
| Status |
|
|
|
| Set Name | Test Cases |
|---|---|
| Sample | subtask0_sample_01.txt, subtask0_sample_02.txt, subtask0_sample_03.txt |
| Subtask1 | 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 |
| Subtask2 | subtask0_sample_01.txt, subtask0_sample_02.txt, subtask0_sample_03.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, subtask2_21.txt, subtask2_22.txt, subtask2_23.txt, subtask2_24.txt, subtask2_25.txt, subtask2_26.txt, subtask2_27.txt, subtask2_28.txt, subtask2_29.txt, subtask2_30.txt, subtask2_31.txt, subtask2_32.txt, subtask2_33.txt, subtask2_34.txt, subtask2_35.txt, subtask2_36.txt, subtask2_37.txt, subtask2_38.txt, subtask2_39.txt, subtask2_40.txt |
| Case Name | Status | Exec Time | Memory |
|---|---|---|---|
| subtask0_sample_01.txt | AC | 31 ms | 1256 KiB |
| subtask0_sample_02.txt | AC | 28 ms | 1304 KiB |
| subtask0_sample_03.txt | TLE | 2036 ms | 1940 KiB |
| subtask1_01.txt | AC | 28 ms | 1300 KiB |
| subtask1_02.txt | AC | 28 ms | 1316 KiB |
| subtask1_03.txt | AC | 26 ms | 1424 KiB |
| subtask1_04.txt | AC | 26 ms | 1312 KiB |
| subtask1_05.txt | AC | 26 ms | 1320 KiB |
| subtask1_06.txt | AC | 26 ms | 1328 KiB |
| subtask1_07.txt | AC | 28 ms | 1328 KiB |
| subtask1_08.txt | AC | 28 ms | 1424 KiB |
| subtask1_09.txt | AC | 26 ms | 1308 KiB |
| subtask1_10.txt | AC | 28 ms | 1568 KiB |
| subtask1_11.txt | AC | 28 ms | 1568 KiB |
| subtask1_12.txt | AC | 30 ms | 1540 KiB |
| subtask1_13.txt | AC | 29 ms | 1552 KiB |
| subtask1_14.txt | AC | 29 ms | 1300 KiB |
| subtask1_15.txt | AC | 31 ms | 1380 KiB |
| subtask1_16.txt | AC | 28 ms | 1556 KiB |
| subtask1_17.txt | AC | 29 ms | 1552 KiB |
| subtask1_18.txt | AC | 29 ms | 1300 KiB |
| subtask1_19.txt | AC | 30 ms | 1328 KiB |
| subtask1_20.txt | AC | 29 ms | 1380 KiB |
| subtask2_21.txt | AC | 30 ms | 1564 KiB |
| subtask2_22.txt | TLE | 2034 ms | 1936 KiB |
| subtask2_23.txt | TLE | 2033 ms | 1944 KiB |
| subtask2_24.txt | TLE | 2033 ms | 1948 KiB |
| subtask2_25.txt | TLE | 2035 ms | 1936 KiB |
| subtask2_26.txt | TLE | 2034 ms | 1940 KiB |
| subtask2_27.txt | TLE | 2033 ms | 1944 KiB |
| subtask2_28.txt | AC | 32 ms | 1816 KiB |
| subtask2_29.txt | AC | 32 ms | 1820 KiB |
| subtask2_30.txt | AC | 82 ms | 1816 KiB |
| subtask2_31.txt | TLE | 2033 ms | 1948 KiB |
| subtask2_32.txt | TLE | 2034 ms | 1944 KiB |
| subtask2_33.txt | TLE | 2034 ms | 1944 KiB |
| subtask2_34.txt | TLE | 2034 ms | 1936 KiB |
| subtask2_35.txt | TLE | 2035 ms | 1940 KiB |
| subtask2_36.txt | TLE | 2035 ms | 1940 KiB |
| subtask2_37.txt | TLE | 2034 ms | 1944 KiB |
| subtask2_38.txt | TLE | 2033 ms | 1940 KiB |
| subtask2_39.txt | TLE | 2034 ms | 1940 KiB |
| subtask2_40.txt | TLE | 2034 ms | 1944 KiB |