Submission #2180632
Source Code Expand
open System open System.Collections open System.Collections.Generic open System.IO open System.Linq [<AutoOpen>] module input = let Str() = Console.ReadLine() let StrArr() = Str().Split() let IntArr() = StrArr() |> Array.map int let Int() = Str() |> int let Char() = Str() |> char let CharList() = [ for c in Str() -> c ] let CharArray() = [|for c in Str() -> c|] [<AutoOpen>] module parse = let c2s (c:obj) = match c with | :? (char[]) as c -> new string(c) | :? (char list) as c -> c|>Array.ofList|>String | :? char as c -> c.ToString() | _ -> failwith "" let c2i c = c2s(c) |> int [<EntryPoint>] let main _ = let n,X = let t = IntArr() t.[0],t.[1] let a = IntArr() let mutable sum = 0; for i in 0..n-1 do if (1 &&& (X>>>i)) = 1 then sum <- sum + a.[i] printfn "%i" sum 0
Submission Info
Submission Time | |
---|---|
Task | B - 価格の合計 |
User | rui0422 |
Language | F# (Mono 4.0) |
Score | 100 |
Code Size | 995 Byte |
Status | AC |
Exec Time | 41 ms |
Memory | 14040 KB |
Judge Result
Set Name | Sample | All | ||||
---|---|---|---|---|---|---|
Score / Max Score | 0 / 0 | 100 / 100 | ||||
Status |
|
|
Set Name | Test Cases |
---|---|
Sample | subtask0_sample01.txt, subtask0_sample02.txt, subtask0_sample03.txt |
All | subtask0_sample01.txt, subtask0_sample02.txt, subtask0_sample03.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 |
Case Name | Status | Exec Time | Memory |
---|---|---|---|
subtask0_sample01.txt | AC | 41 ms | 11992 KB |
subtask0_sample02.txt | AC | 41 ms | 11868 KB |
subtask0_sample03.txt | AC | 40 ms | 11992 KB |
subtask1_01.txt | AC | 41 ms | 11868 KB |
subtask1_02.txt | AC | 40 ms | 9820 KB |
subtask1_03.txt | AC | 40 ms | 11868 KB |
subtask1_04.txt | AC | 41 ms | 14032 KB |
subtask1_05.txt | AC | 41 ms | 11868 KB |
subtask1_06.txt | AC | 41 ms | 11868 KB |
subtask1_07.txt | AC | 41 ms | 14032 KB |
subtask1_08.txt | AC | 40 ms | 11984 KB |
subtask1_09.txt | AC | 41 ms | 11984 KB |
subtask1_10.txt | AC | 41 ms | 11868 KB |
subtask1_11.txt | AC | 41 ms | 11992 KB |
subtask1_12.txt | AC | 41 ms | 11868 KB |
subtask1_13.txt | AC | 41 ms | 14040 KB |
subtask1_14.txt | AC | 40 ms | 9944 KB |
subtask1_15.txt | AC | 41 ms | 11868 KB |
subtask1_16.txt | AC | 41 ms | 11992 KB |
subtask1_17.txt | AC | 40 ms | 9820 KB |