Question

Сколько трёхзначных чисел можно составить из цифр 0, 1, 9 при условии, что цифры не должны повторяться?

Answer 1

109, 190, 901, 910 - всего 4 числа.

Answer 2

ОТвет: 109, 190, 901 , 910

Вот код:

А = Новый Массив(3);
А[0] = "0";
А[1] = "1";
А[2] = "9";

Для Н =0 По 2 Цикл
        Для НН = 0 По 2 Цикл
               Для ННН = 0 По 2 Цикл
       Если А[Н]=А[НН] Или А[Н]=А[ННН] Или А[НН]=А[ННН] Или А[Н] = "0" Тогда
                Продолжить;
       КонецЕсли;

       Сообщить(Число(А[Н]+А[НН]+А[ННН]));

       КонецЦикла; 
    КонецЦикла;
КонецЦикла;