結果

問題 No.1168 Digit Sum Sequence
ユーザー norioc
提出日時 2024-11-11 05:11:53
言語 Elixir
(1.18.1)
結果
AC  
実行時間 598 ms / 2,000 ms
コード長 363 bytes
コンパイル時間 1,210 ms
コンパイル使用メモリ 62,256 KB
実行使用メモリ 54,280 KB
最終ジャッジ日時 2024-11-11 05:12:18
合計ジャッジ時間 20,031 ms
ジャッジサーバーID
(参考情報)
judge5 / judge1
このコードへのチャレンジ
(要ログイン)
ファイルパターン 結果
sample AC * 2
other AC * 29
権限があれば一括ダウンロードができます

ソースコード

diff #

defmodule Main do
  def input, do: IO.read(:line) |> String.trim
  def ii, do: input() |> String.to_integer
  def li, do: input() |> String.split |> Enum.map(&String.to_integer/1)

  def f(x) do
    if x == 0 do
      0
    else
      case rem(x, 9) do
        0 -> 9
        n -> n
      end
    end
  end

  def main do
    n = ii()

    IO.puts f(n)
  end
end
0