вместо хищных зверей можно добавить травоядных зверей
Желтые Красные Зеленые
6 6 0
8 0 4
7 3 2
Вот программка на Паскале:
uses Crt;
var g, k, z:integer;
begin
ClrScr;
for g:=0 to 12 do
for k:=0 to 12 do
for z:=0 to 12 do
begin
if (g+k+z=12) and (0.5*g+1.5*k+2*z=12) then
WriteLn (g,' ',k, ' ', z);
end;
ReadLn;
end.
Вывод: Можно вообще не брать красные или зеленые шары.
Если брать шары всех цветов, то ответ у задачи один
7 3 2
Const
Pi = 3.141592;
var
R, S, L : Real;
begin<span>
</span> Write('Введите радиус круга: ');<span>
</span> ReadLn(R);
<span>
</span> S := Pi*sqr(R);<span>
</span> L := 2*Pi*R;
<span>
</span> Writeln('S круга: ', S:0:3);<span>
</span> Writeln('Длина окружности: ', L:0:3);<span>
</span> Readln;
end.
Так как цифры в шифре должны быть различны, то количество вариантов определяется по формуле A(n,k) = n!/(n-k)! = 9!/(9-3)! = 7*8*9 = 504
1) 4
2) 0
3) 9,7
4) 3,14
5) 0,45
6) 0,5
7) 6
8) 6
9) 7
10) 49