N-queens problem: Difference between revisions

print "Solution " & n_sol

print ""

for i = 1 to n

write " "

for j = 1 to n

if j = x[i]

write "Q "

else

write ". "

. print ""

print "".

ok = 1

for i = 1 to y - 1

if x[y] = x[i] or abs (x[i] - x[y]) = abs (y - i)

ok = 0

.

.

call test

if ok = 1 and y + 1 <= n

y += 1

x[y] = 1

else

if ok = 1

n_sol += 1

if n_sol <= 1

call show_sol

.