結果
| 問題 | 
                            No.191 供託金
                             | 
                    
| コンテスト | |
| ユーザー | 
                             | 
                    
| 提出日時 | 2020-04-14 08:16:44 | 
| 言語 | Elixir  (1.18.1)  | 
                    
| 結果 | 
                             
                                AC
                                 
                             
                            
                         | 
                    
| 実行時間 | 561 ms / 5,000 ms | 
| コード長 | 285 bytes | 
| コンパイル時間 | 972 ms | 
| コンパイル使用メモリ | 62,252 KB | 
| 実行使用メモリ | 55,132 KB | 
| 最終ジャッジ日時 | 2024-12-31 04:03:33 | 
| 合計ジャッジ時間 | 16,659 ms | 
| 
                            ジャッジサーバーID (参考情報)  | 
                        judge4 / judge3 | 
(要ログイン)
| ファイルパターン | 結果 | 
|---|---|
| sample | AC * 3 | 
| other | AC * 23 | 
ソースコード
defmodule Main do
  def main do
    IO.read(:line)
    IO.read(:line)
    |> String.split()
    |> Enum.map(&String.to_integer/1)
    |> solve
    |> IO.puts()
  end
  defp solve(list) do
    list
    |> Enum.count(&(&1 <= Enum.sum(list) |> div(10)))
    |> (&(&1 * 30)).()
  end
end