結果
問題 | No.283 スライドパズルと魔方陣 |
ユーザー |
|
提出日時 | 2015-11-01 04:21:50 |
言語 | Ruby (3.4.1) |
結果 |
AC
|
実行時間 | 637 ms / 2,000 ms |
コード長 | 1,538 bytes |
コンパイル時間 | 118 ms |
コンパイル使用メモリ | 8,064 KB |
実行使用メモリ | 13,440 KB |
最終ジャッジ日時 | 2025-02-07 08:47:40 |
合計ジャッジ時間 | 13,604 ms |
ジャッジサーバーID (参考情報) |
judge1 / judge1 |
(要ログイン)
ファイルパターン | 結果 |
---|---|
other | AC * 39 |
コンパイルメッセージ
Syntax OK
ソースコード
#!/usr/bin/ruby def gen_odd(n) m=n.times.map{[0]*n} r=n-1 c=n/2 i=0 n.times{ r=(r+1)%n m[r][c]=i+=1 (n-1).times{ r=(r+n-1)%n c=(c+1)%n m[r][c]=i+=1 } } m end def gen_quad(n) z=n**2 i=0 m=n.times.map{[0]*n} n.times{|r|n.times{|c| j,k=i.divmod(n) j%=4 k%=4 m[r][c]=i+=1 m[r][c]=z-m[r][c]+1 if (j==0||j==3)&&(k==1||k==2) or (j==1||j==2)&&(k==0||k==3) }} m end def gen_lux(n) m=n.times.map{[0]*n} o={l:[[4,1],[2,3]],u:[[1,4],[2,3]],x:[[1,4],[3,2]]} lux=(n/4+1).times.map{[:l]*(n/2)} + [[:u]*(n/2)] + (n/4-1).times.map{[:x]*(n/2)} lux[n/4][n/4],lux[n/4+1][n/4]=lux[n/4+1][n/4],lux[n/4][n/4] b=gen_odd(n/2).map{|e|e.map{|f|4*(f-1)}} n.times{|r|n.times{|c| br,xr=r.divmod(2) bc,xc=c.divmod(2) m[r][c]=b[br][bc]+o[lux[br][bc]][xr][xc] }} m end def gen_magicsquare(n) if n%2==1 gen_odd(n) elsif n%4==0 gen_quad(n) else gen_lux(n) end end def sliding_parity(m) flat=[] n=m.size parity=0 n.times{|y|n.times{|x| k=m[y][x] if k!=n*n flat<<k #k-=1 #ty,tx=k.divmod(n) #d=(y-ty).abs+(x-tx).abs else flat<<k tx=ty=n-1 parity=(y-ty).abs+(x-tx).abs end }} flat.size.times{|i| (i+1..flat.size-1).each{|j| parity+=1 if flat[i]>flat[j] } } parity%2 end N=gets.to_i a=$<.map{|e| e.split.map{|f|f.to_i==0 ? N*N : f.to_i} } if N==2 puts :impossible exit end board=gen_magicsquare(N) if sliding_parity(a)!=sliding_parity(board) if N%2==0 board.reverse! else board[0],board[N-1]=board[N-1],board[0] end end puts :possible puts board.map{|e|e*' '}