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

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

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

Вот код:

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

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

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

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

Program egor_sasha; var num_eg, num_sash,pri,pri1: real; var mes_eg,mes_sash: real; beginwriteln('numer egora'); readln(num_eg); writeln('numer sashi'); readln(num_sash); writeln('mesto egora (verkh=1,vniz=0)'); readln(mes_eg); writeln('mesto sashi (verkh=1,vniz=0)'); readln(mes_sash); pri: =num_sash+1; pri1: =num_eg+1; if num_eg=pri then    writeln('yes')  else writeln('no'); if num_sash=pri1 then    writeln('yes')  else writeln('no'); if mes_eg=1 then    writeln('egor-high')else  writeln('egor-low'); if mes_sash=1 then    writeln('sasha-high')else  writeln('sasha-low'); end.

Символ-это набор команд состоящих из единиц и нулей,любое слово вводимое тобой или выведонное тебе состоит из этих последовательностей. Например символ I (Я) зашифрован так 0100 1001 <-- 8 этих битов образуют 1 символ,называемым байтом,поэтому любой текст,изображение,видео(там немного другая схема действует),все это всего лишь грандиозный набор команд,разговоры по телефону тоже кодируются из вибрации в набор импульсов и на обратном выходе опять преобразуются в нам всем привычные слова.Любые механизмы,и даже мы с Вами можем передавать информацию,в том числе Азбукой Морзе,даже несколько последовательно сформулированных щелчков пальцев несут в себе информацию,главное ее понять,расшифровать и преобразовать,в видео,аудио,текст,фотографию.