結果
| 問題 | 
                            No.9002 FizzBuzz(テスト用)
                             | 
                    
| ユーザー | 
                             yukicco
                         | 
                    
| 提出日時 | 2018-11-16 22:50:25 | 
| 言語 | Elixir  (1.18.1)  | 
                    
| 結果 | 
                             
                                AC
                                 
                             
                            
                         | 
                    
| 実行時間 | 647 ms / 5,000 ms | 
| コード長 | 712 bytes | 
| コンパイル時間 | 1,059 ms | 
| コンパイル使用メモリ | 64,336 KB | 
| 実行使用メモリ | 54,560 KB | 
| 最終ジャッジ日時 | 2024-12-31 02:25:38 | 
| 合計ジャッジ時間 | 4,510 ms | 
| 
                            ジャッジサーバーID (参考情報)  | 
                        judge2 / judge1 | 
(要ログイン)
| ファイルパターン | 結果 | 
|---|---|
| other | AC * 4 | 
ソースコード
defmodule Main do
    def getsAll(device \\ :stdio, prompt), do: getsAll(device, prompt, "")
    defp getsAll(device, prompt, input) do
        x = IO.gets(device, prompt)
        case x do
            {:error, _} -> x
            :eof -> input
            _ -> getsAll(device, prompt, input <> x)
        end
    end
    def fizzbuzz(n) do
        cond do
            rem(n, 3) == 0 and rem(n, 5) == 0 -> "FizzBuzz"
            rem(n, 3) == 0 -> "Fizz"
            rem(n, 5) == 0 -> "Buzz"
            true -> n
        end
    end
    def main do
        inputs = getsAll(nil) |> String.split
        n = inputs |> Enum.at(0) |> String.to_integer
        for x <- 1..n, do: IO.puts fizzbuzz(x)
    end
end
            
            
            
        
            
yukicco