Показать сообщение отдельно
Старый 07.02.2008, 12:42   #12  
oip is offline
oip
Axapta
Лучший по профессии 2014
 
2,564 / 1416 (53) ++++++++
Регистрация: 28.11.2005
Записей в блоге: 1
Э?

info(strFmt("%1", str2date("d", 123))); => ' '

И трехбуквенных комбинаций уже нет таких.

X++:
static void Jobeee(Args _args)
{
    container c = ['a','b','c','d','e','f','j','h','i','j','k','l','m','n','o','p','q','r','s','t','u','v','w','x','y','z'];
    int       length = conlen (c);
    int       i = 1;
    int       j;
    int       k;
    str       s;

    void checkAndInfo (str _s)
    {
        if (s)
            info(s);
    }

;
    while (i <= length)
    {
        j = 1;

        s = strFmt("%1", str2date(conpeek(c,i), 123));

        // Однобуквенные строки
        checkAndInfo (s);

        while (j <= length)
        {
            k = 1;

            s = strFmt("%1", str2date(conpeek(c,i)+conpeek(c,j), 123));

            // Двухбуквенные строки
            checkAndInfo (s);

            while (k <= length)
            {
                s = strFmt("%1", str2date(conpeek(c,i)+conpeek(c,j)+conpeek(c,k), 123));

                // Трехбуквенные строки
                checkAndInfo (s);

                k++;
            }
            j++;
        }
        i++;
    }
}