結果

問題 No.826 連絡網
ユーザー letrangerjp
提出日時 2019-05-03 22:25:50
言語 Ruby
(3.4.1)
結果
WA  
実行時間 -
コード長 322 bytes
コンパイル時間 355 ms
コンパイル使用メモリ 7,424 KB
実行使用メモリ 38,188 KB
最終ジャッジ日時 2024-12-31 18:11:11
合計ジャッジ時間 61,677 ms
ジャッジサーバーID
(参考情報)
judge4 / judge5
このコードへのチャレンジ
(要ログイン)
ファイルパターン 結果
sample AC * 2
other AC * 10 WA * 1 TLE * 19
権限があれば一括ダウンロードができます
コンパイルメッセージ
Syntax OK

ソースコード

diff #

#!ruby -rprime

N, P = gets.split.map &:to_i
_primes = P.prime_division.to_h.keys
primes = Prime.each(N).select{|i|
  _primes.any?{|j|
    i == j || i * j <= N
  }
}
oks = [0] * (N+1)

(1..N).each{|i|
  primes.each{|pr|
    if i % pr == 0
      oks[i] = oks[i / pr] = 1
    end
  }
}

oks[1] = 0
oks[P] = 1
p oks.count(1)
0