結果

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

ソースコード

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 |> 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