結果

問題 No.283 スライドパズルと魔方陣
ユーザー cielciel
提出日時 2015-11-01 04:21:50
言語 Ruby
(2.7.1p83)
結果
AC  
実行時間 431 ms / 2,000 ms
コード長 1,538 Byte
コンパイル時間 483 ms
使用メモリ 11,896 KB
最終ジャッジ日時 2020-08-23 04:32:48
このコードへのチャレンジ(β)

テストケース

テストケース表示
入力 結果 実行時間
使用メモリ
testcase_00 AC 10 ms
11,504 KB
testcase_01 AC 10 ms
11,632 KB
testcase_02 AC 10 ms
11,600 KB
testcase_03 AC 10 ms
11,624 KB
testcase_04 AC 10 ms
11,624 KB
testcase_05 AC 10 ms
11,652 KB
testcase_06 AC 10 ms
11,648 KB
testcase_07 AC 10 ms
11,664 KB
testcase_08 AC 10 ms
11,508 KB
testcase_09 AC 10 ms
11,612 KB
testcase_10 AC 11 ms
11,608 KB
testcase_11 AC 10 ms
11,612 KB
testcase_12 AC 10 ms
11,684 KB
testcase_13 AC 10 ms
11,524 KB
testcase_14 AC 10 ms
11,636 KB
testcase_15 AC 14 ms
11,652 KB
testcase_16 AC 14 ms
11,616 KB
testcase_17 AC 15 ms
11,536 KB
testcase_18 AC 15 ms
11,544 KB
testcase_19 AC 16 ms
11,628 KB
testcase_20 AC 16 ms
11,544 KB
testcase_21 AC 67 ms
11,784 KB
testcase_22 AC 69 ms
11,740 KB
testcase_23 AC 74 ms
11,676 KB
testcase_24 AC 73 ms
11,736 KB
testcase_25 AC 84 ms
11,724 KB
testcase_26 AC 85 ms
11,600 KB
testcase_27 AC 400 ms
11,772 KB
testcase_28 AC 397 ms
11,732 KB
testcase_29 AC 429 ms
11,788 KB
testcase_30 AC 431 ms
11,708 KB
testcase_31 AC 427 ms
11,680 KB
testcase_32 AC 428 ms
11,840 KB
testcase_33 AC 430 ms
11,664 KB
testcase_34 AC 430 ms
11,828 KB
testcase_35 AC 428 ms
11,852 KB
testcase_36 AC 430 ms
11,896 KB
testcase_37 AC 430 ms
11,680 KB
testcase_38 AC 429 ms
11,808 KB
権限があれば一括ダウンロードができます
コンパイルメッセージ
Syntax OK

ソースコード

diff #
#!/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*' '}
0