結果

問題 No.279 木の数え上げ
ユーザー gemmarogemmaro
提出日時 2020-04-14 11:33:43
言語 Elixir
(1.16.2)
結果
MLE  
実行時間 -
コード長 555 bytes
コンパイル時間 1,329 ms
コンパイル使用メモリ 62,076 KB
実行使用メモリ 176,088 KB
最終ジャッジ日時 2024-06-09 23:24:54
合計ジャッジ時間 20,148 ms
ジャッジサーバーID
（参考情報） 		judge2 / judge5
このコードへのチャレンジ
（要ログイン）

テストケース

テストケース表示
入力 結果 実行時間
実行使用メモリ
testcase_00 AC 513 ms
53,936 KB
testcase_01 AC 522 ms
54,028 KB
testcase_02 AC 509 ms
54,192 KB
testcase_03 AC 520 ms
54,060 KB
testcase_04 AC 521 ms
54,404 KB
testcase_05 AC 531 ms
53,936 KB
testcase_06 AC 515 ms
54,024 KB
testcase_07 AC 518 ms
53,764 KB
testcase_08 AC 521 ms
53,800 KB
testcase_09 AC 530 ms
54,160 KB
testcase_10 MLE -
testcase_11 MLE -
testcase_12 MLE -
testcase_13 MLE -
testcase_14 MLE -
testcase_15 MLE -
testcase_16 MLE -
testcase_17 MLE -
testcase_18 MLE -
testcase_19 MLE -
testcase_20 MLE -
権限があれば一括ダウンロードができます

ソースコード

diff # 

defmodule Main do
  def main do
    IO.read(:line)
    |> solve
    |> IO.puts()
  end

  defp solve(s) do
    s
    |> String.to_charlist()
    |> count_tre([0, 0, 0])
    |> Enum.min()
  end

  defp count_tre(s, [t, r, e]) do
    cond do
      Enum.empty?(s) ->
        [t, r, e |> div(2)]

      true ->
        tl(s)
        |> count_tre(
          cond do
            hd(s) == ?t -> [t + 1, r, e]
            hd(s) == ?r -> [t, r + 1, e]
            hd(s) == ?e -> [t, r, e + 1]
            true -> [t, r, e]
          end
        )
    end
  end
end
0