Сколько трехзначных чисел можно записать с цифр 1,2,3 и 7 при условии,что в записи числа не должно быть - id381665620201027 от tkaa 27.10.2020 11:05

Question

Информатика: Сколько трехзначных чисел можно записать с цифр 1,2,3 и 7 при условии,что в записи числа не должно быть одинаковых цифр?

tkaa · Accepted Answer

{
Вам следовало бы более точно описать, что вам нужно.
Непонятно, что это за условие со следованием. В примере 21106 за цифрой 2 следует 11, но за 11 не следует ничего из перечисленного. Ну или в нем 10 следует за 1, но тогда зачем условия следования для 10..12?
+ ничего не сказано про случайное распределение этих чисел. Так-то программа, которая все время выводит "1", тоже подходит под эти условия
}

const
R: array[1..12,1..5] of integer = (
(4,5,7,9,10),   //1
(5,6,8,10,11), //2
(6,7,9,11,12), //3
(1,7,8,10,12), //4
(1,2,8,9,11),   //5
(2,3,9,10,12), //6
(1,3,4,10,11), //7
(2,4,5,11,12), //8
(1,3,5,6,12),   //9
(1,2,4,6,7),    //10
(2,3,5,7,8),    //11
(3,4,6,8,9)     //12
);

var i,k:integer;
begin
k := 1 + random(12);
for i := 1 to 1 + random(3) do
    begin
    write(k);
    k := R[k,1 + random(5)];
    end;
end.

Сколько трехзначных чисел можно записать с цифр 1,2,3 и 7 при условии,что в записи числа не должно быть одинаковых цифр?

MOGZ ответил