queens :: Int -> [[Int]]
queens n = filter test (generate n)
where generate 0 = [[]]
generate k = [q : qs | q <- [1..n], qs <- generate (k-1)]
test [] = True
test (q:qs) = isSafe q qs && test qs
isSafe try qs = not (try `elem` qs || sameDiag try qs)
sameDiag try qs = any (\(colDist,q) -> abs (try - q) == colDist) $ zip [1..] qs
include"stdafx.h"
include
include
using namespace std;
int main()
{
char choice;
do {
int data[6], n, temp, i, j;
printf("Enter number of terms: ");
scanf_s("%d", &n);
printf("Enter elements: ");
/*for (data > 6, data < 6)
{
printf("Error: Enter SIX numbers ");
}*/
for (i = 0; i<n; ...
Jotto is a word guessing game similar to mastermind. Each person chooses a secret word and the other person tries to guess their secret word. The game is fun and I recommend you try it. This challenge is to come up with an optimum starting set of guessing words.
Jotto Words:
5 letters each
no ...
