#61911 (Ruby) No.308 素数は通れません

提出ソース

結果

問題	No.308 素数は通れません
ユーザー	rickytheta
提出日時	2015-12-01 22:51:35
言語	Ruby (3.3.0)
結果	WA
実行時間	-
コード長	1,598 bytes
コンパイル時間	67 ms
コンパイル使用メモリ	11,328 KB
実行使用メモリ	15,736 KB
最終ジャッジ日時	2023-10-12 07:32:36
合計ジャッジ時間	13,836 ms
ジャッジサーバーID （参考情報）	judge12 / judge13

このコードへのチャレンジ
（要ログイン）

テストケース

テストケース表示

入力	結果	実行時間実行使用メモリ
testcase_00	AC	94 ms 15,452 KB
testcase_01	AC	99 ms 15,492 KB
testcase_02	AC	103 ms 15,300 KB
testcase_03	AC	102 ms 15,336 KB
testcase_04	AC	102 ms 15,512 KB
testcase_05	AC	113 ms 15,332 KB
testcase_06	AC	117 ms 15,588 KB
testcase_07	AC	102 ms 15,300 KB
testcase_08	AC	102 ms 15,304 KB
testcase_09	AC	103 ms 15,408 KB
testcase_10	AC	123 ms 15,464 KB
testcase_11	AC	124 ms 15,300 KB
testcase_12	AC	102 ms 15,372 KB
testcase_13	AC	132 ms 15,352 KB
testcase_14	AC	132 ms 15,588 KB
testcase_15	AC	105 ms 15,428 KB
testcase_16	AC	103 ms 15,496 KB
testcase_17	AC	102 ms 15,336 KB
testcase_18	AC	104 ms 15,360 KB
testcase_19	AC	104 ms 15,408 KB
testcase_20	AC	104 ms 15,420 KB
testcase_21	AC	104 ms 15,412 KB
testcase_22	AC	103 ms 15,560 KB
testcase_23	AC	103 ms 15,332 KB
testcase_24	AC	102 ms 15,560 KB
testcase_25	AC	103 ms 15,516 KB
testcase_26	AC	105 ms 15,592 KB
testcase_27	AC	105 ms 15,404 KB
testcase_28	AC	106 ms 15,328 KB
testcase_29	AC	105 ms 15,544 KB
testcase_30	AC	107 ms 15,328 KB
testcase_31	AC	105 ms 15,512 KB
testcase_32	AC	117 ms 15,596 KB
testcase_33	AC	107 ms 15,552 KB
testcase_34	AC	105 ms 15,532 KB
testcase_35	AC	105 ms 15,300 KB
testcase_36	AC	95 ms 15,432 KB
testcase_37	AC	94 ms 15,612 KB
testcase_38	AC	98 ms 15,564 KB
testcase_39	AC	93 ms 15,512 KB
testcase_40	AC	95 ms 15,416 KB
testcase_41	AC	93 ms 15,416 KB
testcase_42	AC	93 ms 15,352 KB
testcase_43	AC	92 ms 15,428 KB
testcase_44	AC	93 ms 15,348 KB
testcase_45	AC	94 ms 15,544 KB
testcase_46	AC	92 ms 15,372 KB
testcase_47	AC	91 ms 15,404 KB
testcase_48	AC	91 ms 15,424 KB
testcase_49	AC	92 ms 15,296 KB
testcase_50	AC	93 ms 15,304 KB
testcase_51	AC	93 ms 15,356 KB
testcase_52	AC	93 ms 15,388 KB
testcase_53	AC	96 ms 15,372 KB
testcase_54	AC	92 ms 15,288 KB
testcase_55	AC	92 ms 15,348 KB
testcase_56	WA	-
testcase_57	AC	94 ms 15,352 KB
testcase_58	AC	93 ms 15,596 KB
testcase_59	AC	95 ms 15,380 KB
testcase_60	AC	93 ms 15,588 KB
testcase_61	AC	93 ms 15,424 KB
testcase_62	AC	92 ms 15,520 KB
testcase_63	WA	-
testcase_64	AC	94 ms 15,420 KB
testcase_65	AC	93 ms 15,380 KB
testcase_66	AC	90 ms 15,564 KB
testcase_67	AC	91 ms 15,372 KB
testcase_68	AC	93 ms 15,408 KB
testcase_69	AC	93 ms 15,356 KB
testcase_70	AC	94 ms 15,524 KB
testcase_71	AC	94 ms 15,408 KB
testcase_72	AC	94 ms 15,388 KB
testcase_73	AC	92 ms 15,348 KB
testcase_74	AC	92 ms 15,300 KB
testcase_75	AC	92 ms 15,436 KB
testcase_76	WA	-
testcase_77	AC	94 ms 15,436 KB
testcase_78	AC	93 ms 15,296 KB
testcase_79	AC	91 ms 15,420 KB
testcase_80	WA	-
testcase_81	WA	-
testcase_82	AC	90 ms 15,552 KB
testcase_83	AC	91 ms 15,388 KB
testcase_84	WA	-
testcase_85	AC	92 ms 15,552 KB
testcase_86	WA	-
testcase_87	WA	-
testcase_88	AC	94 ms 15,508 KB
testcase_89	AC	95 ms 15,292 KB
testcase_90	WA	-
testcase_91	AC	95 ms 15,604 KB
testcase_92	AC	94 ms 15,608 KB
testcase_93	AC	94 ms 15,644 KB
testcase_94	AC	94 ms 15,372 KB
testcase_95	AC	94 ms 15,616 KB
testcase_96	WA	-
testcase_97	AC	94 ms 15,424 KB
testcase_98	AC	94 ms 15,556 KB
testcase_99	WA	-
testcase_100	WA	-
testcase_101	WA	-
testcase_102	AC	94 ms 15,340 KB
testcase_103	AC	93 ms 15,344 KB
testcase_104	AC	93 ms 15,532 KB
testcase_105	AC	94 ms 15,348 KB
testcase_106	WA	-

権限があれば一括ダウンロードができます

コンパイルメッセージ

Main.rb:34: warning: assigned but unused variable - k
Main.rb:43: warning: assigned but unused variable - i
Syntax OK

ソースコード

raw source code

require 'prime'

N_MAX = 110
$mp = Array.new(N_MAX).map{Array.new(N_MAX,0)}
$used = Array.new(N_MAX).map{Array.new(N_MAX,false)}
$n = gets.chomp.to_i

$vx = [1,0,-1,0]
$vy = [0,1,0,-1]
def dfs(w,h,y,x)
  return false if y<0 || x<0 || y>=h || x>=w
  return false if $used[y][x]
  $used[y][x] = true
  return false if $mp[y][x]==1e9
  return true if $mp[y][x]==$n
  t = $mp[y][x]
  return false if isP_MR(t)
  for i in 0...4
    return true if dfs(w,h,y+$vy[i],x+$vx[i])
  end
  return false
end

def powmod(a,b,m)
  return 1 if b==0
  p = powmod(a,b/2,m)
  p = p*p%m
  p = p*a%m if b%2==0
  return p
end

# http://d.hatena.ne.jp/pashango_p/20090704/1246692091
def isP_MR(q)
  k = 10000
  return Prime.prime?(q) if q<10000000
  return false if q&1==0

  d = (q-1)>>1
  while d&1==0
    d>>=1
  end
  r = [q-1,(2*Math.log(q)**2).floor].min
  for i in 2..r
    a = r
    t = d
    y = powmod(a,t,q)
    while t!=q-1 && y!=1 && y!=q-1
      y = powmod(y,2,q)
      t <<= 1
    end
    if y!=q-1 && t&1==0
      return false
    end
  end
  return true
end

if $n<100
  for w in 3...$n
    h = $n/w + ( $n%w == 0 ? 0 : 1 )
    for i in 0...N_MAX
      for j in 0...N_MAX
        $mp[i][j] = 1e9
        if i<h && j<w && i*w+j<$n
          $mp[i][j] = i*w+j+1
        end
        $used[i][j] = false
      end
    end
    if dfs(w,h,0,0)
      puts w
      break
    end
  end
else
  c = 8
  while true
    # process
    if $n%c!=1
      puts c
      break
    end
    if isP_MR($n-c)
      puts c
      break
    end
    # succeed
    while true
      c += 2
      break if isP_MR(c+1)
    end
  end
end

yukicoder

結果

テストケース

コンパイルメッセージ

ソースコード