結果

問題 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
権限があれば一括ダウンロードができます

ソースコード

diff #

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
0