結果

問題 No.308 素数は通れません
ユーザー rickythetarickytheta
提出日時 2015-12-02 18:49:15
言語 Ruby
(3.3.0)
結果
RE  
実行時間 -
コード長 1,892 bytes
コンパイル時間 457 ms
コンパイル使用メモリ 7,680 KB
実行使用メモリ 12,800 KB
最終ジャッジ日時 2024-09-14 08:00:54
合計ジャッジ時間 15,300 ms
ジャッジサーバーID
（参考情報） 		judge1 / judge5
このコードへのチャレンジ
（要ログイン）

テストケース

テストケース表示
入力 結果 実行時間
実行使用メモリ
testcase_00 AC 102 ms
12,288 KB
testcase_01 AC 110 ms
12,416 KB
testcase_02 AC 115 ms
12,160 KB
testcase_03 AC 118 ms
12,288 KB
testcase_04 AC 114 ms
12,416 KB
testcase_05 AC 128 ms
12,288 KB
testcase_06 AC 138 ms
12,544 KB
testcase_07 AC 118 ms
12,416 KB
testcase_08 AC 118 ms
12,288 KB
testcase_09 AC 121 ms
12,160 KB
testcase_10 AC 153 ms
12,416 KB
testcase_11 AC 152 ms
12,416 KB
testcase_12 AC 117 ms
12,288 KB
testcase_13 AC 171 ms
12,416 KB
testcase_14 AC 167 ms
12,416 KB
testcase_15 AC 123 ms
12,416 KB
testcase_16 AC 121 ms
12,416 KB
testcase_17 AC 123 ms
12,160 KB
testcase_18 AC 124 ms
12,288 KB
testcase_19 AC 126 ms
12,416 KB
testcase_20 AC 128 ms
12,416 KB
testcase_21 AC 128 ms
12,416 KB
testcase_22 AC 128 ms
12,416 KB
testcase_23 AC 124 ms
12,288 KB
testcase_24 AC 130 ms
12,288 KB
testcase_25 AC 124 ms
12,288 KB
testcase_26 AC 128 ms
12,416 KB
testcase_27 AC 122 ms
12,288 KB
testcase_28 AC 123 ms
12,288 KB
testcase_29 AC 124 ms
12,288 KB
testcase_30 AC 128 ms
12,416 KB
testcase_31 AC 128 ms
12,416 KB
testcase_32 AC 161 ms
12,288 KB
testcase_33 AC 132 ms
12,288 KB
testcase_34 AC 133 ms
12,288 KB
testcase_35 AC 134 ms
12,416 KB
testcase_36 RE -
testcase_37 RE -
testcase_38 RE -
testcase_39 RE -
testcase_40 RE -
testcase_41 RE -
testcase_42 RE -
testcase_43 RE -
testcase_44 RE -
testcase_45 RE -
testcase_46 RE -
testcase_47 RE -
testcase_48 RE -
testcase_49 RE -
testcase_50 RE -
testcase_51 RE -
testcase_52 RE -
testcase_53 RE -
testcase_54 RE -
testcase_55 RE -
testcase_56 RE -
testcase_57 RE -
testcase_58 RE -
testcase_59 RE -
testcase_60 RE -
testcase_61 RE -
testcase_62 RE -
testcase_63 RE -
testcase_64 RE -
testcase_65 RE -
testcase_66 RE -
testcase_67 RE -
testcase_68 RE -
testcase_69 RE -
testcase_70 RE -
testcase_71 RE -
testcase_72 RE -
testcase_73 RE -
testcase_74 RE -
testcase_75 RE -
testcase_76 RE -
testcase_77 RE -
testcase_78 RE -
testcase_79 RE -
testcase_80 RE -
testcase_81 RE -
testcase_82 RE -
testcase_83 RE -
testcase_84 RE -
testcase_85 RE -
testcase_86 RE -
testcase_87 RE -
testcase_88 RE -
testcase_89 RE -
testcase_90 RE -
testcase_91 RE -
testcase_92 RE -
testcase_93 RE -
testcase_94 RE -
testcase_95 RE -
testcase_96 RE -
testcase_97 RE -
testcase_98 RE -
testcase_99 RE -
testcase_100 RE -
testcase_101 RE -
testcase_102 RE -
testcase_103 RE -
testcase_104 RE -
testcase_105 RE -
testcase_106 RE -
権限があれば一括ダウンロードができます
コンパイルメッセージ
Main.rb:47: warning: assigned but unused variable - i
Syntax OK

ソースコード

diff # 

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)
  result = 1
  while b>0
    result = (result*a)%m if b&1==1
    a = (a*a)%m
    b >>= 1
  end
  return result
end

# https://ja.wikipedia.org/wiki/%E3%83%9F%E3%83%A9%E3%83%BC%E2%80%93%E3%83%A9%E3%83%93%E3%83%B3%E7%B4%A0%E6%95%B0%E5%88%A4%E5%AE%9A%E6%B3%95
def isP_MR(q)
  k = 1000
  # return Prime.prime?(q) if q<10000000
  return true if q==2
  return false if q<2
  return false if q&1==0

  d = q-1
  while d&1==0
    d>>=1
  end
  # r = [q-1,(2*Math.log(q)**2).floor].min
  for i in 0...k
    a = rand(q-2)+1
    t = d
    y = powmod(a,t,q)
    while t!=q-1 && y!=1 && y!=q-1
      y = (y*y) % 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
  if n%8!=1
    puts 8
  else
    if isP_MR(n-8)
      puts 14
    else
      puts 8
    end
  end
  # 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
0