Pascal/Вводится целое неотрицательное число. Определить сколько различных чисел, такой же длины можно составить из его цифр. При составлении числа должны использоваться все цифры исходного числа, в том же количестве, что и в исходном числе.
даналеди
3
12.02.2021 12:44
36
Другие вопросы по теме Информатика
Ираказефирка
22.09.2019 14:50
instagramm1
22.09.2019 14:50
1234567891yyttgg
05.08.2019 08:10
Арина11841
05.08.2019 08:10
bektemirova1
05.08.2019 08:10
ВикаЛук1
09.09.2019 13:50
юра419
07.07.2019 08:20
Nr2006
07.07.2019 08:20
Популярные вопросы
- Запиши все двухзначные числа с цифрами 4, 5, 6 сколько всего чисел получится?...
1 - Длина пути между равна 408км. с какой скоростью должна ехать машина,...
3 - Как называется внутренняя среда клетки? охарактеризуйте ее состав и...
3 - Сало+ручка, шоу+злак.что за сказки?...
3 - За какое время гитлер хотел завоевать ?...
1 - Зависимость вероятности оживления человека от времени наступления «клинической...
3 - Решите поож производную функции : y=-3cosx*(x^2+2)...
2 - Запиши число в котором 8 единиц первого разряда, единиц второго разряда...
2 - Предложение с действительным причастием а)непрекращяющимся потоком шли...
2 - Крокодилы имеют разные по размеру зубы. но именно зубы млекопитающих...
3
var a,b,i:integer;
begin
b:=1;
i:=0;
write('Введите число: '); readln(a);
while a <> 0 do begin
i:=i+1;
a:=a div 10;
b:=b*i;
end;
write('Количество возможных перестановок равно: ', b);
end.