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

提出ソース

結果

問題	No.308 素数は通れません
ユーザー	rickytheta
提出日時	2015-12-01 22:51:35
言語	Ruby (3.3.0)
結果	WA
実行時間	-
コード長	1,598 bytes
コンパイル時間	230 ms
コンパイル使用メモリ	7,552 KB
実行使用メモリ	12,800 KB
最終ジャッジ日時	2024-09-14 06:43:34
合計ジャッジ時間	14,154 ms
ジャッジサーバーID （参考情報）	judge1 / judge3

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

テストケース

テストケース表示

入力	結果	実行時間実行使用メモリ
testcase_00	AC	107 ms 12,288 KB
testcase_01	AC	114 ms 12,288 KB
testcase_02	AC	114 ms 12,416 KB
testcase_03	AC	113 ms 12,416 KB
testcase_04	AC	112 ms 12,416 KB
testcase_05	AC	120 ms 12,288 KB
testcase_06	AC	130 ms 12,416 KB
testcase_07	AC	113 ms 12,160 KB
testcase_08	AC	113 ms 12,160 KB
testcase_09	AC	115 ms 12,288 KB
testcase_10	AC	138 ms 12,416 KB
testcase_11	AC	137 ms 12,544 KB
testcase_12	AC	112 ms 12,416 KB
testcase_13	AC	145 ms 12,416 KB
testcase_14	AC	145 ms 12,288 KB
testcase_15	AC	115 ms 12,544 KB
testcase_16	AC	117 ms 12,416 KB
testcase_17	AC	116 ms 12,288 KB
testcase_18	AC	115 ms 12,544 KB
testcase_19	AC	116 ms 12,544 KB
testcase_20	AC	115 ms 12,416 KB
testcase_21	AC	117 ms 12,160 KB
testcase_22	AC	116 ms 12,416 KB
testcase_23	AC	114 ms 12,288 KB
testcase_24	AC	114 ms 12,288 KB
testcase_25	AC	114 ms 12,416 KB
testcase_26	AC	114 ms 12,544 KB
testcase_27	AC	114 ms 12,416 KB
testcase_28	AC	117 ms 12,544 KB
testcase_29	AC	116 ms 12,288 KB
testcase_30	AC	118 ms 12,288 KB
testcase_31	AC	116 ms 12,288 KB
testcase_32	AC	127 ms 12,416 KB
testcase_33	AC	117 ms 12,288 KB
testcase_34	AC	115 ms 12,544 KB
testcase_35	AC	114 ms 12,416 KB
testcase_36	AC	109 ms 12,544 KB
testcase_37	AC	100 ms 12,416 KB
testcase_38	AC	102 ms 12,288 KB
testcase_39	AC	102 ms 12,288 KB
testcase_40	AC	101 ms 12,544 KB
testcase_41	AC	102 ms 12,416 KB
testcase_42	AC	102 ms 12,288 KB
testcase_43	AC	104 ms 12,416 KB
testcase_44	AC	103 ms 12,288 KB
testcase_45	AC	102 ms 12,416 KB
testcase_46	AC	102 ms 12,416 KB
testcase_47	AC	101 ms 12,416 KB
testcase_48	AC	101 ms 12,288 KB
testcase_49	AC	101 ms 12,416 KB
testcase_50	AC	102 ms 12,416 KB
testcase_51	AC	102 ms 12,288 KB
testcase_52	AC	102 ms 12,160 KB
testcase_53	AC	101 ms 12,672 KB
testcase_54	AC	101 ms 12,288 KB
testcase_55	AC	102 ms 12,416 KB
testcase_56	WA	-
testcase_57	AC	100 ms 12,416 KB
testcase_58	AC	101 ms 12,416 KB
testcase_59	AC	102 ms 12,288 KB
testcase_60	AC	103 ms 12,416 KB
testcase_61	AC	103 ms 12,288 KB
testcase_62	AC	103 ms 12,416 KB
testcase_63	WA	-
testcase_64	AC	103 ms 12,544 KB
testcase_65	AC	102 ms 12,288 KB
testcase_66	AC	102 ms 12,416 KB
testcase_67	AC	102 ms 12,416 KB
testcase_68	AC	101 ms 12,544 KB
testcase_69	AC	103 ms 12,416 KB
testcase_70	AC	103 ms 12,160 KB
testcase_71	AC	103 ms 12,416 KB
testcase_72	AC	102 ms 12,416 KB
testcase_73	AC	102 ms 12,416 KB
testcase_74	AC	101 ms 12,416 KB
testcase_75	AC	101 ms 12,288 KB
testcase_76	WA	-
testcase_77	AC	105 ms 12,416 KB
testcase_78	AC	103 ms 12,288 KB
testcase_79	AC	102 ms 12,544 KB
testcase_80	WA	-
testcase_81	WA	-
testcase_82	AC	103 ms 12,544 KB
testcase_83	AC	103 ms 12,416 KB
testcase_84	WA	-
testcase_85	AC	104 ms 12,160 KB
testcase_86	WA	-
testcase_87	WA	-
testcase_88	AC	105 ms 12,416 KB
testcase_89	AC	104 ms 12,288 KB
testcase_90	WA	-
testcase_91	AC	104 ms 12,416 KB
testcase_92	AC	102 ms 12,288 KB
testcase_93	AC	103 ms 12,160 KB
testcase_94	AC	104 ms 12,416 KB
testcase_95	AC	105 ms 12,288 KB
testcase_96	WA	-
testcase_97	AC	105 ms 12,544 KB
testcase_98	AC	104 ms 12,416 KB
testcase_99	WA	-
testcase_100	WA	-
testcase_101	WA	-
testcase_102	AC	105 ms 12,288 KB
testcase_103	AC	104 ms 12,416 KB
testcase_104	AC	105 ms 12,416 KB
testcase_105	AC	104 ms 12,416 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

結果

テストケース

コンパイルメッセージ

ソースコード