Submission #65981

Source Code Expand

import Control.Monad
import Data.List

main = do
	n <- readLn
	ds <- replicateM n readLn
	putStrLn $ ( show . sum ) ds
	putStrLn $ show $ let
		sorted = sort ds
		result = last sorted - ( sum . init ) sorted
		in if result < 0 then 0 else result

Submission Info

Submission Time
Task B - 2点間距離の最大と最小 ( Maximum and Minimum )
User torus711
Language Haskell (GHC 7.4.1)
Score 100
Code Size 257 Byte
Status AC
Exec Time 67 ms
Memory 1804 KB

Judge Result

Set Name All
Score / Max Score 100 / 100
Status
AC × 63
Set Name Test Cases
All 00_sample_01.txt, 00_sample_02.txt, 00_sample_03.txt, 00_sample_04.txt, 00_sample_05.txt, 01_rnd_00.txt, 01_rnd_01.txt, 01_rnd_02.txt, 01_rnd_03.txt, 01_rnd_04.txt, 01_rnd_05.txt, 01_rnd_06.txt, 01_rnd_07.txt, 01_rnd_08.txt, 01_rnd_09.txt, 01_rnd_10.txt, 01_rnd_11.txt, 01_rnd_12.txt, 01_rnd_13.txt, 01_rnd_14.txt, 01_rnd_15.txt, 02_rnd2_00.txt, 02_rnd2_01.txt, 02_rnd2_02.txt, 02_rnd2_03.txt, 02_rnd2_04.txt, 02_rnd2_05.txt, 02_rnd2_06.txt, 02_rnd2_07.txt, 02_rnd2_08.txt, 02_rnd2_09.txt, 02_rnd2_10.txt, 02_rnd2_11.txt, 02_rnd2_12.txt, 02_rnd2_13.txt, 02_rnd2_14.txt, 02_rnd2_15.txt, 02_rnd2_16.txt, 02_rnd2_17.txt, 02_rnd2_18.txt, 02_rnd2_19.txt, 02_rnd2_20.txt, 02_rnd2_21.txt, 02_rnd2_22.txt, 02_rnd2_23.txt, 02_rnd2_24.txt, 02_rnd2_25.txt, 02_rnd2_26.txt, 02_rnd2_27.txt, 02_rnd2_28.txt, 02_rnd2_29.txt, 03_max_00.txt, 03_max_01.txt, 03_max_02.txt, 03_max_03.txt, 03_max_04.txt, 03_max_05.txt, 03_max_06.txt, 03_max_07.txt, 03_max_08.txt, 03_max_09.txt, 04_maxret_01.txt, 04_maxret_02.txt
Case Name Status Exec Time Memory
00_sample_01.txt AC 67 ms 1140 KB
00_sample_02.txt AC 26 ms 1192 KB
00_sample_03.txt AC 26 ms 1144 KB
00_sample_04.txt AC 25 ms 1132 KB
00_sample_05.txt AC 27 ms 1160 KB
01_rnd_00.txt AC 26 ms 1292 KB
01_rnd_01.txt AC 24 ms 1292 KB
01_rnd_02.txt AC 26 ms 1256 KB
01_rnd_03.txt AC 26 ms 1304 KB
01_rnd_04.txt AC 26 ms 1268 KB
01_rnd_05.txt AC 25 ms 1292 KB
01_rnd_06.txt AC 25 ms 1280 KB
01_rnd_07.txt AC 25 ms 1268 KB
01_rnd_08.txt AC 24 ms 1256 KB
01_rnd_09.txt AC 25 ms 1264 KB
01_rnd_10.txt AC 24 ms 1264 KB
01_rnd_11.txt AC 26 ms 1264 KB
01_rnd_12.txt AC 25 ms 1292 KB
01_rnd_13.txt AC 27 ms 1292 KB
01_rnd_14.txt AC 25 ms 1268 KB
01_rnd_15.txt AC 26 ms 1264 KB
02_rnd2_00.txt AC 24 ms 1296 KB
02_rnd2_01.txt AC 28 ms 1416 KB
02_rnd2_02.txt AC 25 ms 1388 KB
02_rnd2_03.txt AC 27 ms 1420 KB
02_rnd2_04.txt AC 25 ms 1268 KB
02_rnd2_05.txt AC 25 ms 1284 KB
02_rnd2_06.txt AC 28 ms 1400 KB
02_rnd2_07.txt AC 27 ms 1388 KB
02_rnd2_08.txt AC 26 ms 1544 KB
02_rnd2_09.txt AC 26 ms 1264 KB
02_rnd2_10.txt AC 26 ms 1444 KB
02_rnd2_11.txt AC 26 ms 1424 KB
02_rnd2_12.txt AC 24 ms 1420 KB
02_rnd2_13.txt AC 25 ms 1260 KB
02_rnd2_14.txt AC 27 ms 1396 KB
02_rnd2_15.txt AC 25 ms 1392 KB
02_rnd2_16.txt AC 26 ms 1296 KB
02_rnd2_17.txt AC 27 ms 1392 KB
02_rnd2_18.txt AC 27 ms 1392 KB
02_rnd2_19.txt AC 25 ms 1424 KB
02_rnd2_20.txt AC 25 ms 1424 KB
02_rnd2_21.txt AC 25 ms 1264 KB
02_rnd2_22.txt AC 25 ms 1264 KB
02_rnd2_23.txt AC 26 ms 1392 KB
02_rnd2_24.txt AC 26 ms 1396 KB
02_rnd2_25.txt AC 27 ms 1392 KB
02_rnd2_26.txt AC 25 ms 1396 KB
02_rnd2_27.txt AC 26 ms 1396 KB
02_rnd2_28.txt AC 25 ms 1420 KB
02_rnd2_29.txt AC 30 ms 1428 KB
03_max_00.txt AC 30 ms 1648 KB
03_max_01.txt AC 31 ms 1648 KB
03_max_02.txt AC 29 ms 1652 KB
03_max_03.txt AC 29 ms 1680 KB
03_max_04.txt AC 30 ms 1648 KB
03_max_05.txt AC 29 ms 1648 KB
03_max_06.txt AC 33 ms 1648 KB
03_max_07.txt AC 31 ms 1804 KB
03_max_08.txt AC 31 ms 1652 KB
03_max_09.txt AC 32 ms 1652 KB
04_maxret_01.txt AC 32 ms 1676 KB
04_maxret_02.txt AC 24 ms 1136 KB