結果

問題 No.1026 OGAWA's New Keyboard
ユーザー gemmaro
提出日時 2020-04-21 08:55:34
言語 Elixir
(1.18.1)
結果
TLE  
実行時間 -
コード長 563 bytes
コンパイル時間 1,206 ms
コンパイル使用メモリ 63,136 KB
実行使用メモリ 90,512 KB
最終ジャッジ日時 2024-12-31 04:31:55
合計ジャッジ時間 30,509 ms
ジャッジサーバーID
(参考情報)
judge1 / judge4
このコードへのチャレンジ
(要ログイン)
ファイルパターン 結果
sample AC * 4 TLE * 1
other AC * 17 TLE * 4
権限があれば一括ダウンロードができます

ソースコード

diff #

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