結果

問題 No.12 限定された素数
ユーザー 👑 obakyanobakyan
提出日時 2020-04-27 21:50:09
言語 Lua
(LuaJit 2.1.1696795921)
結果
AC  
実行時間 332 ms / 5,000 ms
コード長 1,133 bytes
コンパイル時間 112 ms
コンパイル使用メモリ 6,688 KB
実行使用メモリ 72,348 KB
最終ジャッジ日時 2024-05-03 11:08:31
合計ジャッジ時間 7,792 ms
ジャッジサーバーID
（参考情報） 		judge5 / judge2
このコードへのチャレンジ
（要ログイン）

テストケース

テストケース表示
入力 結果 実行時間
実行使用メモリ
testcase_00 AC 213 ms
72,308 KB
testcase_01 AC 256 ms
72,320 KB
testcase_02 AC 236 ms
72,324 KB
testcase_03 AC 213 ms
72,240 KB
testcase_04 AC 247 ms
72,284 KB
testcase_05 AC 277 ms
72,240 KB
testcase_06 AC 332 ms
72,292 KB
testcase_07 AC 304 ms
72,256 KB
testcase_08 AC 255 ms
72,276 KB
testcase_09 AC 271 ms
72,320 KB
testcase_10 AC 249 ms
72,348 KB
testcase_11 AC 290 ms
72,320 KB
testcase_12 AC 306 ms
72,224 KB
testcase_13 AC 327 ms
72,232 KB
testcase_14 AC 278 ms
72,260 KB
testcase_15 AC 320 ms
72,328 KB
testcase_16 AC 311 ms
72,316 KB
testcase_17 AC 221 ms
72,332 KB
testcase_18 AC 214 ms
72,216 KB
testcase_19 AC 213 ms
72,224 KB
testcase_20 AC 241 ms
72,336 KB
testcase_21 AC 254 ms
72,244 KB
testcase_22 AC 215 ms
72,288 KB
testcase_23 AC 215 ms
72,292 KB
testcase_24 AC 224 ms
72,240 KB
testcase_25 AC 267 ms
72,192 KB
権限があれば一括ダウンロードができます

ソースコード

diff # 

local mmi, mma = math.min, math.max
local mfl, mce = math.floor, math.ceil

local function getprimes(x)
  local primes = {}
  local allnums = {}
  for i = 1, x do allnums[i] = true end
  for i = 2, x do
    if allnums[i] then
      table.insert(primes, i)
      local lim = mfl(x / i)
      for j = 2, lim do
        allnums[j * i] = false
      end
    end
  end
  return primes
end

local n = io.read("*n")
local t = {}
for i = 1, n do
  local a = io.read("*n")
  t[a] = true
end
local primes = getprimes(5100000)
local lim = 5000000
local ret = -1
local left = 1
local curuse, curcnt = {}, 0
for i = 1, #primes do
  local p = primes[i]
  if lim < p then break end
  local valid = true
  while 0 < p do
    local v = p % 10
    if not t[v] then
      valid = false
      break
    else
      if not curuse[v] then
        curuse[v] = true
        curcnt = curcnt + 1
      end
    end
    p = mfl(p / 10)
  end
  if not valid then
    curuse = {}
    curcnt = 0
    left = primes[i] + 1
  elseif curcnt == n then
    local right = primes[i + 1] - 1
    right = mmi(right, lim)
    ret = mma(ret, right - left)
  end
end
print(ret)
0