Var a,i:integer;
m:array[1..10] of integer;
begin
a:=10;
randomize;
for i:=1 to a do
begin
m[i]:=random(21);
end;
for i:=1 to a do
if (m[i]>5) and (m[i]<15) then
writeln(m[i]);
<span>end. </span>
От 11 до 55 = 55-11+1 = 42 варианта
Перестановки = 42^[5] (факториальная степень)= 42 * 41 * 40 * 39 * 38 = 102 080 160
незнаю что такое схема состава но решается так:
86-8=78 любят игры
(62+54)-78=38 т.е. 38 играют в обе игры