Submission #3421876

Source Code Expand

let n, t = stdin.ReadLine().Split() |> fun x -> int x.[0], int x.[1]
let l = [for _ in 1..n -> stdin.ReadLine().Split() |> fun x -> int x.[0], int x.[1]] |> List.filter (fun (_, y) -> y <= t) |> List.sortBy (fun (_, y) -> y)
if (List.length l) = 0 then printfn "TLE" else printfn "%d" (snd l.[0])

Submission Info

Submission Time
Task B - Time Limit Exceeded
User gunmaken
Language F# (Mono 4.0)
Score 0
Code Size 298 Byte
Status WA
Exec Time 66 ms
Memory 15068 KB

Judge Result

Set Name All Sample
Score / Max Score 0 / 200 0 / 0
Status
AC × 5
WA × 8
AC × 1
WA × 2
Set Name Test Cases
All hand_1, sample_01, sample_02, sample_03, testcase_1, testcase_2, testcase_3, testcase_4, testcase_5, testcase_6, testcase_7, testcase_8, testcase_9
Sample sample_01, sample_02, sample_03
Case Name Status Exec Time Memory
hand_1 WA 46 ms 12124 KB
sample_01 WA 64 ms 10972 KB
sample_02 AC 36 ms 11612 KB
sample_03 WA 65 ms 13016 KB
testcase_1 WA 64 ms 10968 KB
testcase_2 WA 66 ms 15068 KB
testcase_3 AC 35 ms 9564 KB
testcase_4 AC 36 ms 9564 KB
testcase_5 AC 37 ms 11612 KB
testcase_6 WA 66 ms 13020 KB
testcase_7 WA 65 ms 12892 KB
testcase_8 WA 66 ms 10972 KB
testcase_9 AC 36 ms 11612 KB