結果

問題 No.1026 OGAWA's New Keyboard
ユーザー gemmaro
提出日時 2020-04-21 08:55:34
言語 Elixir
(1.20.4)
コンパイル:
elixirc _filename_
実行:
elixir -e Main.main
結果
TLE  
実行時間 -
コード長 563 bytes
記録
記録タグの例:
初AC ショートコード 純ショートコード 純主流ショートコード 最速実行時間
コンパイル時間 500 ms
コンパイル使用メモリ 77,740 KB
実行使用メモリ 166,224 KB
最終ジャッジ日時 2026-10-09 20:13:29
合計ジャッジ時間 11,327 ms
ジャッジサーバーID
（参考情報） 		judge3_0 / judge4_0
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 4 TLE * 1
other AC * 2 TLE * 1 -- * 18
権限があれば一括ダウンロードができます

ソースコード

diff #
raw source code 

defmodule Main do
  def main do
    1..(IO.read(:line)
        |> String.trim()
        |> String.to_integer())
    |> Enum.map(fn _ ->
      IO.read(:line)
      |> String.trim()
      |> String.split()
      |> (fn [t, s] -> {t |> String.to_integer(), s} end).()
    end)
    |> solve
    |> IO.puts()
  end

  def solve(t) do
    solve_rec(t, [])
  end

  def solve_rec([], r) do
    r |> Enum.join()
  end

  def solve_rec([{t, s} | l], r) do
    case t do
      0 -> solve_rec(l, r |> List.insert_at(-1, s))
      1 -> solve_rec(l, [s | r])
    end
  end
end
0