結果

問題 No.227 簡単ポーカー
コンテスト
ユーザー 3qvwn
提出日時 2019-07-08 00:56:20
言語 Elixir
(1.19.5)
コンパイル:
elixirc _filename_
実行:
elixir -e Main.main
結果
AC  
実行時間 328 ms / 5,000 ms
コード長 438 bytes
記録
記録タグの例:
初AC ショートコード 純ショートコード 純主流ショートコード 最速実行時間
コンパイル時間 781 ms
コンパイル使用メモリ 72,388 KB
実行使用メモリ 63,428 KB
最終ジャッジ日時 2026-06-04 14:41:31
合計ジャッジ時間 6,657 ms
ジャッジサーバーID
（参考情報） 		judge3_0 / judge2_1
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
other AC * 14
権限があれば一括ダウンロードができます

ソースコード

diff #
raw source code 

defmodule Main do 
  def main do
    IO.gets("") |> String.trim |> String.split |> Enum.map(&String.to_integer/1) |> Enum.group_by(fn x -> x end) |> Enum.map(fn {_, value} -> Enum.count(value) end) |> Enum.sort(&(&1 >= &2)) |> judge |> IO.puts
  end
  
  def judge([3,2]), do: "FULL HOUSE"
  def judge([3,1,1]), do: "THREE CARD"
  def judge([2,2,1]), do: "TWO PAIR"
  def judge([2,1,1,1]), do: "ONE PAIR"
  def judge(_), do: "NO HAND"
end
0