結果
問題 | No.227 簡単ポーカー |
ユーザー | yukicco |
提出日時 | 2018-11-20 04:30:45 |
言語 | Elixir (1.16.2) |
結果 |
AC
|
実行時間 | 643 ms / 5,000 ms |
コード長 | 652 bytes |
コンパイル時間 | 1,217 ms |
コンパイル使用メモリ | 55,052 KB |
実行使用メモリ | 49,888 KB |
最終ジャッジ日時 | 2023-08-29 23:08:14 |
合計ジャッジ時間 | 11,424 ms |
ジャッジサーバーID (参考情報) |
judge14 / judge13 |
(要ログイン)
テストケース
テストケース表示入力 | 結果 | 実行時間 実行使用メモリ |
---|---|---|
testcase_00 | AC | 625 ms
49,808 KB |
testcase_01 | AC | 620 ms
49,888 KB |
testcase_02 | AC | 630 ms
49,032 KB |
testcase_03 | AC | 619 ms
49,096 KB |
testcase_04 | AC | 620 ms
49,264 KB |
testcase_05 | AC | 623 ms
49,676 KB |
testcase_06 | AC | 619 ms
49,208 KB |
testcase_07 | AC | 622 ms
49,812 KB |
testcase_08 | AC | 632 ms
49,632 KB |
testcase_09 | AC | 643 ms
49,068 KB |
testcase_10 | AC | 627 ms
49,312 KB |
testcase_11 | AC | 631 ms
49,324 KB |
testcase_12 | AC | 637 ms
48,976 KB |
testcase_13 | AC | 623 ms
49,632 KB |
ソースコード
defmodule Main do def judgePoker(cards) do grouped_cards = cards |> Enum.group_by(&(&1)) three_cards = length(for {k, v} <- grouped_cards, length(v) == 3, do: k) two_cards = length(for {k, v} <- grouped_cards, length(v) == 2, do: k) case {three_cards, two_cards} do {1, 1} -> "FULL HOUSE" {1, 0} -> "THREE CARD" {0, 2} -> "TWO PAIR" {0, 1} -> "ONE PAIR" _ -> "NO HAND" end end def main do inputs = IO.binread(:all) |> String.split as = inputs |> Enum.map(&String.to_integer/1) IO.puts judgePoker(as) end end