например число 123 - 6 комбинаций, 120 - 4 комбинации.
также работает с 4значными
Объяснение:
program prog;
var num,i,j,tmp:integer;
arr:array [1..4] of integer=(-1,-1,-1,-1);
zero: boolean;
begin
writeln('Input number:');
readln(num);
i:=1;j:=1;zero:=false;
while num<>0 do begin
tmp:=num mod 10;
if (tmp<>arr[1]) and (tmp<>arr[2]) and (tmp<>arr[3]) and (tmp<>arr[4]) then begin
arr[i]:=tmp;
if (zero=false) and (tmp=0) then zero:=true;
write(i,':');
writeln('arr[i]=',arr[i]);
writeln('num=',num);
i:=i+1
end;
num:=num div 10;
end;
num:=1;tmp:=1;
i:=i-1;
for j:=1 to i do num:=num*j;
if zero=true then begin
for j:=1 to i-1 do tmp:=tmp*j;
num:=num-tmp;
end;
writeln('vsego chisel =',num);
end.
Проприоцепция — «ощущение тела»
Этот орган чувств распределён по всему телу подобно осязанию и находится в мышцах и быстропроводящих нервных волокнах. Он позволяет определить положение частей тела относительно друг друга. Чтобы ощутить его действие, попробуйте, закрыв глаза, поднять одну коленку над другой и немного ею подвигать. Благодаря проприоцепции вы всегда будете знать, какая из двух коленок выше, на каком они расстоянии друг от друга и многое другое.
Ноцицепция — болевой орган чувств
Служит в основном для формирования в человеке понимания, что безопасно, а что нет. Например, когда ребёнок подносит руку к пламени, идёт два процесса: рука рефлекторно отдёргивается, а в мозг передаётся ощущение боли. Ноцицепция как раз отвечает за это ощущение. Если бы в теле не было рецепторов боли, человек получал бы травмы в разы чаще — он бы просто не знал, что для него опасно, а что нет!
Эквибриоцепция — чувство равновесия
Наверное, самый известный из неизвестных органов чувств. Вестибулярные каналы находятся во внутреннем ухе и нам определить положение тела в пространстве. При этом неважно, может ли человек видеть, слышать или осязать — с органов равновесия он всегда понимает, как через него проходит, говоря физическим языком, вектор силы тяжести.
Термоцепция — теплоощущение
Здесь всё просто — терморецепторы расположены по всей коже и могут давать сигналы о присутствии либо отсутствии на ней высоких температур. Иногда эту систему рецепторов включают в осязание, но её важность для человека избежать ожогов, перегрева или обморожения) позволяет выделить термоцепцию в отдельный орган чувств.
Ощущение вибрации
Человек может распознавать вибрации частотой от 1 до 10 000 Гц. Амплитуда колебаний различается с точностью до 5 мкм. Основные отделы чувствительности этого органа находятся в ступнях и кистях. Кстати, слух — это, фактически, составляющая вибрационной чувствительности, ведь мы можем определять звуки с колебаний барабанной перепонки.
Объяснение:
