結果
問題 |
No.308 素数は通れません
|
ユーザー |
![]() |
提出日時 | 2015-12-11 03:28:39 |
言語 | Ruby (3.4.1) |
結果 |
WA
|
実行時間 | - |
コード長 | 1,373 bytes |
コンパイル時間 | 89 ms |
コンパイル使用メモリ | 7,552 KB |
実行使用メモリ | 816,896 KB |
最終ジャッジ日時 | 2024-09-15 07:52:54 |
合計ジャッジ時間 | 11,805 ms |
ジャッジサーバーID (参考情報) |
judge3 / judge5 |
(要ログイン)
ファイルパターン | 結果 |
---|---|
other | AC * 53 WA * 10 RE * 16 MLE * 2 -- * 26 |
コンパイルメッセージ
Syntax OK
ソースコード
class Integer def prime? n = self.abs() return true if n == 2 return false if n == 1 || n & 1 == 0 d = n-1 d >>= 1 while d & 1 == 0 20.times do a = rand(n-2) + 1 t = d y = ModMath.pow(a,t,n) while t != n-1 && y != 1 && y != n-1 y = (y * y) % n t <<= 1 end return false if y != n-1 && t & 1 == 0 end return true end end module ModMath def ModMath.pow(base, power, mod) result = 1 while power > 0 result = (result * base) % mod if power & 1 == 1 base = (base * base) % mod power >>= 1; end result end end $dx = [1, 0, -1, 0] $dy = [0, 1, 0, -1] def find(cx, cy, w) t = cy * w + cx 4.times do |i| x = cx + $dx[i] y = cy + $dy[i] t = y * w + x next if x < 0 || x >= w || y < 0 || t + 1 > $n || $b[t] return true if t + 1 == $n $b[t] = true check = find(x, y, w) $b[t] = false return true if check end return false end $n = gets.to_i $b = Array.new($n) 25.times do |j| $b[j] = (j + 1).prime? end if $n <= 25 25.times do |w| w += 1 if find(0, 0, w) puts w exit end end end if $n % 8 != 1 && !($n - 8).prime? puts 8 else puts 14 end