Hace 6.000 millones de años Marte era un planeta repleto de vida. Había unos seres inteligentes, una especie de seres humanos gigantes debido a que Marte tiene una gravedad inferior a la de la Tierra. La gravedad de la Tierra es de 9,81  m/s²  mientras que el de Marte es de 3,711 m/s².

Bueno, de entrada Google, no es la "policía de internet". Básicamente son indexadores de páginas, no pueden garantizar de ninguna manera (ni nadie) que haya páginas falsas...

Si entraste una vez y no te deja una segunda, quzás detecten tu IP, y no quieren que alguien 'supuestamente ya timado', regrese a tomar pruebas... intenta interponiendo una VPN entre tu equipo y dicha página.

Se puede hacer una captura de pantalla de esos cabrones que se dedican a estafar a la gente de esta forma y luego denunciarlo a la Policía ?  

http://dle.rae.es/?id=FznyqUR


Está todo allí, bastante claro, si te tomas la molestia de leerlo... entresaco un par de párrafos que inicialmente resumen bastante.En el primer pedazo de código se definen funcionalidad previa, enumeraciones y tal, como se indica aquí:
...
- Luego hay 4 constructores de clase, para permitir invocar el tipo de alfabeto de que se quiere generar en base a las opciones que permite. (para ! X " habría que elegir Custom, y pasar la cadena ("1X2")
- Finalmente hay un método que construye el alfabeto.

La idea de esta clase, es que el alfabeto sea definido una sola vez y pueda ser usada como parámetro para enumerar. Así se evita que mientras se enumere se modifique el alfabeto (o el tamaño del mismo) y dé lugar a errores durante la ejecución. Ya que se construye y luego es de solo lectura, no puede modificarse mientras se usa.

El siguiente código, copiado de allí:
El bucle interno que realiza toda la operatoria, para generar una permutación y el bucle externo para iterar entre ttodas las permutaciones.

    Do
        v = k
        n = Numchars
        Do
            x = (v Mod p_Sizealfabeto)
            Clave(n) = p_Alfabeto(x) ' convertir el byte a char.
            v \= p_Sizealfabeto ' división entera.
            n -= 2
        Loop While (n >= 0)
        ' USAR la clave desde aquí
        ' llamada a FuncionX(Clave)
        k += 1
    Loop While (k < s_MaxPermutaciones)
 

Equilicuá... si ya has visitado el enlace para saber lo que significa, tu pregunta sobra...

Justo las líneas antes del bucle, señalé esto:

    If (.PermutacionInicialLng < 0) Then .PermutacionInicialLng = 0
    If (.PermutacionInicialStr.Length > 0) Then
        ' FALTA: código para convertir la clave a la enésima permutación.
         ' es el proceso inverso al seguido en el algoritmo y debiera facilitarse como una función pública. 
        ' k= EnesimaPermutacion(.PermutacionStr)  ' La función que devolvería el índice de la permutación reclamada.
    Else
        k = .PermutacionInicialLng
    End If
 

Convertir una clave-apuesta (permutación) a un número indexado de permutación dentro de todas las permutaciones, es (como señalo en dicho texto) la operación inversa...
Resulta tan obvio, que ni me molesté en hacerlo. En general con ese algoritmo (el primero de 4), la única forma de parar en una permutación específica para poder continuar desde donde se dejó en otro momento, exije precisamente convertir una permutación a su valor numérico (el enésimo en la permutación, justamente para luego sumar 1 y seguir generando permutaciones partiendo de ese valor)...

Más arriba al comentar sobre ese algoritmo, describiía que es el más sencillo, pero también el más lento de los 4. Todas las permutaciones de la quiniela (3^14= 4'7millones), en éste equipo desde el que escribo, que data del 2008, las genera en 3'99 segundos, en tanto los otros algoritmos, los generan 2-3 órdenes más rápidos (cientos-miles de veces más rápido)... no se requieren multiplicaciones, divisiones, módulo... solo suma 1 para un único carácter (de toda la palabra) para generar la siguiente permutación. En los otros no puedo computar el tiempo exacto, siempre da 0 TICKS (frente a los casi 40millones de ticks).

En definitiva, lo que te decía al principio es que esto es pura combinatoria, tratarlo como algo distinto, aleja el sentido matemático de un problema conocido, hacia algo que pueda parecer 'raro'...
generar claves = generar las apuestas de la quiniela. Es lo mismo, solo cambia el alfabeto usado ("1X2", para la quiniela) y el tamaño de 'palabras' a generar (para la quiniela una palabra de 14 caracteres).
Cambiando el nombre porque el dominio social sea diferente, no lo convierte en ningún problema nuevo ni distinto, de ahí que cuando señalaste que no habías encontrado 'fuentes', sin estar errado, no llega a ser cierto... es solo porque has buscado por un nombre específico, en vez del genérico del problema.

---

Si quieres hacer algo interesante sobre las quinielas (y de lo que no hay apenas literatura), te comento por ejemplo que intentes lograr cuántas y cuáles permutaciones para 4 partidos, son las mínimas necesarias para asegurar siempre que se aciertan al menos 3 (de los 4 partidos). Es decir que jugando x apuestas para 4 partidos, tengas asegurado (al menos) 3 aciertos... y cuáles son, o mejor dicho, como obtener las combinaciones de dichas apuestas... teniendo en cuanta que todas las permutaciones posibles para esas 4partidos, son al menos 3 triples (27 apuestas) y un partido fijo en las 27 apuestas, que lógicamente son costosas (los triples), ¿...se puede asegurar 3 aciertos con menos apuestas que las 27?...

Esto es algo conocido, aunque te comento que existen muchas combinaciones (y curiosamente la ONLAE, solo contempla 1), más aún esto se puede ampliar a 5, 6, 7, etc... partidos, que lo hace todavía más interesante...

Saludos.

Si quieres hacer algo interesante sobre las quinielas (y de lo que no hay apenas literatura), te comento por ejemplo que intentes lograr cuántas y cuáles permutaciones para 4 partidos, son las mínimas necesarias para asegurar siempre que se aciertan al menos 3 (de los 4 partidos). Es decir que jugando x apuestas para 4 partidos, tengas asegurado (al menos) 3 aciertos... y cuáles son, o mejor dicho, como obtener las combinaciones de dichas apuestas... teniendo en cuanta que todas las permutaciones posibles para esas 4partidos, son al menos 3 triples (27 apuestas) y un partido fijo en las 27 apuestas, que lógicamente son costosas (los triples), ¿...se puede asegurar 3 aciertos con menos apuestas que las 27?...

Esto es algo conocido, aunque te comento que existen muchas combinaciones (y curiosamente la ONLAE, solo contempla 1), más aún esto se puede ampliar a 5, 6, 7, etc... partidos, que lo hace todavía más interesante...

Saludos.

equilicuá... https://foro.elhacker.net/abril_negro/abril_negro_spok_simple_production_of_keys-t468239.10.html

2121110= 0·3^0 + 1·3^1 + 1·3^2 + 1·3^3 + 2·3^4 + 1·3^5 + 2·3^6 = 1902  (+1)

using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
 
namespace ConsoleApplication1
{
    class Program
    {
        static void Main(string[] args)
        {
            int min = 1;
            int max = 299;
 
            for (int n = min - 1; n < max; n++) 
            {
                string B3 = string.Format("{0:00000000000000}", Convert.ToInt64(ConvNumB3(n)));
                string Variacion = B3.Replace("1", "X").Replace("0", "1");
                Console.WriteLine(string.Format("{0}= {1}= {2}", n + 1, B3, Variacion));
            }
            Console.ReadLine();
        }
 
        static string ConvNumB3(int NumB10)
        {
            string numB3 = string.Empty; 
            do
            {
                numB3 = NumB10 % 3 + numB3;
                NumB10 = NumB10 / 3;
 
            } while (NumB10 > 0);
            return numB3;
        }
    }
}