結果

問題 No.806 木を道に
ユーザー gemmarogemmaro
提出日時 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
このコードへのチャレンジ
（要ログイン）

テストケース

テストケース表示
入力 結果 実行時間
実行使用メモリ
testcase_00 AC 549 ms
55,004 KB
testcase_01 AC 548 ms
55,020 KB
testcase_02 AC 550 ms
54,760 KB
testcase_03 AC 545 ms
54,164 KB
testcase_04 AC 554 ms
54,024 KB
testcase_05 AC 548 ms
54,256 KB
testcase_06 AC 551 ms
55,604 KB
testcase_07 AC 547 ms
53,976 KB
testcase_08 AC 557 ms
54,880 KB
testcase_09 AC 549 ms
54,316 KB
testcase_10 AC 1,511 ms
68,916 KB
testcase_11 AC 1,390 ms
68,632 KB
testcase_12 TLE -
testcase_13 TLE -
testcase_14 TLE -
testcase_15 TLE -
testcase_16 AC 1,914 ms
75,404 KB
testcase_17 TLE -
testcase_18 AC 894 ms
60,184 KB
testcase_19 AC 1,552 ms
69,220 KB
testcase_20 TLE -
testcase_21 TLE -
testcase_22 TLE -
testcase_23 TLE -
testcase_24 TLE -
testcase_25 TLE -
testcase_26 AC 1,839 ms
69,864 KB
testcase_27 TLE -
testcase_28 AC 657 ms
55,176 KB
権限があれば一括ダウンロードができます

ソースコード

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