/C++/C++c

C++c

program eightqueen1(output);
 
var i : integer; q : boolean;
    a : array[ 1 ..  8] of boolean;
    b : array[ 2 .. 16] of boolean;
    c : array[−7 ..  7] of boolean;
    x : array[ 1 ..  8] of integer;
 
procedure try( i : integer; var q : boolean);
    var j : integer;
    begin 
    j := 0;
    repeat 
        j := j + 1; 
        q := false;
        if a[ j] and b[ i + j] and c[ i − j] then
            begin 
            x[ i    ] := j;
            a[     j] := false; 
            b[ i + j] := false; 
            c[ i − j] := false;
            if i < 8 then
                begin
                try( i + 1, q);
                if not q then
                    begin 
                    a[     j] := true; 
                    b[ i + j] := true; 
                    c[ i − j] := true;
                    end
                end 
            else 
                q := true
            end
    until q or (j = 8);
    end;
 
begin
for i :=  1 to  8 do a[ i] := true;
for i :=  2 to 16 do b[ i] := true;
for i := −7 to  7 do c[ i] := true;
try( 1, q);
if q then
    for i := 1 to 8 do write( x[ i]:4);
writeln
end.

Source: en.wikipedia.org

Similar codes

0 vote271 views1 answer
Could not load the Visual C++ component "VCBuild.exe". To fix this, 1) install the .NET Framework 2.0 SDK, 2) install Microsoft Visual Studio 2005 or 3) add the location of the component to the system path if it is installed elsewhere.
C++
0 vote268 views1 answer
Generate random double c++
C++
2 votes268 views1 answer
Find character in string c++
C++
1 vote257 views1 answer
Set cmd size c++
C++
0 vote292 views1 answer
Std::iomanip c++
C++
0 vote272 views1 answer
Input time from console C++
C++
1 vote283 views2 answers
Torch cuda is available
C++
3 votes277 views3 answers
Last character of std::string
C++
0 vote274 views1 answer
Leetcode fast io
C++
0 vote274 views1 answer
How to calculate bitwise xor c++
C++