結果
| 問題 | No.637 X: Yet Another FizzBuzz Problem | 
| コンテスト | |
| ユーザー |  | 
| 提出日時 | 2020-04-19 16:48:50 | 
| 言語 | Elixir (1.18.1) | 
| 結果 | 
                                AC
                                 
                             | 
| 実行時間 | 582 ms / 1,000 ms | 
| コード長 | 567 bytes | 
| コンパイル時間 | 944 ms | 
| コンパイル使用メモリ | 62,644 KB | 
| 実行使用メモリ | 55,132 KB | 
| 最終ジャッジ日時 | 2024-12-31 04:29:40 | 
| 合計ジャッジ時間 | 20,348 ms | 
| ジャッジサーバーID (参考情報) | judge3 / judge4 | 
(要ログイン)
| ファイルパターン | 結果 | 
|---|---|
| sample | AC * 2 | 
| other | AC * 30 | 
ソースコード
defmodule Main do
  def main do
    IO.read(:line)
    |> String.trim()
    |> String.split()
    |> Enum.map(&String.to_integer/1)
    |> solve
    |> IO.puts()
  end
  def solve(a) do
    a
    |> Enum.map(fn b ->
      x = b |> rem(3) == 0
      y = b |> rem(5) == 0
      cond do
        x || y ->
          cond do
            x -> 4
            true -> 0
          end +
            cond do
              y -> 4
              true -> 0
            end
        true ->
          b |> to_string |> String.length()
      end
    end)
    |> Enum.sum()
  end
end
            
            
            
        