結果

問題 No.806 木を道に
ユーザー gemmaro
提出日時 2020-04-25 19:49:55
言語 Elixir
(1.18.1)
結果
TLE  
(最新)
AC  
(最初)
実行時間 -
コード長 553 bytes
コンパイル時間 978 ms
コンパイル使用メモリ 62,444 KB
実行使用メモリ 173,284 KB
最終ジャッジ日時 2024-12-31 04:46:14
合計ジャッジ時間 64,528 ms
ジャッジサーバーID
(参考情報)
judge5 / judge4
このコードへのチャレンジ
(要ログイン)
ファイルパターン 結果
sample AC * 2
other AC * 15 TLE * 12
権限があれば一括ダウンロードができます

ソースコード

diff #

defmodule Main do
  def main do
    1..((IO.read(:line)
         |> String.trim()
         |> String.to_integer()) - 1)
    |> Enum.map(fn _ ->
      IO.read(:line)
      |> String.split()
      |> Enum.map(&String.to_integer/1)
    end)
    |> solve()
    |> IO.puts()
  end

  def solve(a) do
    a
    |> Enum.reduce(
      %{},
      fn [x, y], acc ->
        acc
        |> Map.update(x, [y], &[y | &1])
        |> Map.update(y, [x], &[x | &1])
      end
    )
    |> Enum.map(fn {_, v} -> max((v |> length) - 2, 0) end)
    |> Enum.sum()
  end
end
0