結果

問題 No.1205 Eye Drops
ユーザー penqen
提出日時 2020-12-15 20:06:46
言語 Elixir
(1.18.1)
結果
TLE  
(最新)
AC  
(最初)
実行時間 -
コード長 821 bytes
コンパイル時間 890 ms
コンパイル使用メモリ 65,520 KB
実行使用メモリ 86,212 KB
最終ジャッジ日時 2024-12-31 05:17:54
合計ジャッジ時間 45,125 ms
ジャッジサーバーID
（参考情報） 		judge5 / judge4
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 2
other AC * 31 TLE * 6
権限があれば一括ダウンロードができます
コンパイルメッセージ
    warning: variable "i" is unused (if the variable is not meant to be used, prefix it with an underscore)
    │
  5 │     nm = for i <- 0..(m - 1) do
    │              ~
    │
    └─ Main.exs:5:14: Main.main/0

ソースコード

diff # 

defmodule Main do
  def main do
    [n, m] = IO.read(:line) |> String.trim() |> String.split(" ") |> Enum.map(&String.to_integer/1)

    nm = for i <- 0..(m - 1) do
      IO.read(:line) |> String.trim() |> String.split(" ") |> Enum.map(&String.to_integer/1)
    end
    
    solve(n, m, nm) |> IO.puts
  end
  
  def solve(n, m, matrix) when 1 <= n
    and 0 <= m and m <= 100_000
    and is_list(matrix)
  do
    matrix
    |> Enum.reduce({true, {0, 0}}, fn
      [ti, pi], {true, {ct, cp}} ->
        dt = ti - ct
        dp = abs(cp - pi)
        if dp <= dt and pi < n do
          {true, {ti, pi}}
        else
          false
        end
      _, false ->
        false
    end)
    |> (fn
      false ->
        "No"
      {true, _} ->
        "Yes"
    end).()
  end

  def solve(_n, _m, _matrix), do: "No"
  
end
0