3 бита информации это 2^3 вариантов,
2 бита это 2^2 вариантов,
значит игроков в команде от 5 до 8
<em>я так понял на паскале так как информатика </em>
Среда Разработки PascalABC.NET
function factorial(n:integer):integer;
var f:integer;
begin
f :=1;
if(n = 0) or (n = 1) then
factorial:=1
else
if(n>1) then
begin
for var i:=2 to n do
f*=i;
factorial:=f;
end;
end;
begin
var (n,k):=ReadInteger2('n,k = ');
Writeln('Ck/n = ',factorial(n)/(factorial(n-k)*factorial(k)));
end.
Возможно, не уверен, цепь питания
Var a,b,c:real;
begin
write('a = '); readln(a);
write('b = '); readln(b);
c:=sqrt(a*a+b*b);
writeln('c = ',c);
end.
Пример:
a = 3
b = 4
c = 5