1) количество возможных комбинаций это кол во символов в алфавите в степени числа букв в слове - при 2-х символах количество возможных слов равно 2^3=8 < 12 это нам не подходит при 3-х символах количество возможных слов равно 3^3=27 > 12
<span>2)тут все чуть сложнее, нехватку условий дополню сам. смысл такой - рас утверждение говорит нам о клетке А и несет 4 бита значит именно 16 тигров находится в этом вальере(2 в 4степени) следовательно самый простой способ определения, при том условии что именно на этих условия шло сообщение о тигре альбиносе, это бональное вычитание 64-16=48. но повторюсь еще раз, как по мне так условий явно нехватает
токо 12
</span>
//1
Var
f:text;
s,s1:string;
begin
readln(s);
assign(f,'text.txt');
reset(f);
while not Eof(f) do
read(f,s1);
close(f);
s:=s1+s;
assign(f,'text.txt');
rewrite(f);
write(f,s);
close(f);
end.
//2
Var
f:text;
s1,s2:string;
begin
assign(f,'text1.txt');
reset(f);
while not Eof(f) do
read(f,s1);
close(f);
assign(f,'text.txt');
reset(f);
while not Eof(f) do
read(f,s2);
close(f);
s1:=s1+s2;
assign(f,'text1.txt');
rewrite(f);
write(f,s1);
close(f);
end.
Д-синий,е-красный,л-синий,о-красный
Program anima;
Var a,b,c:integer; // Стороны треугольника
begin
writeln('Введите длины сторон: '); // Вывод на экран с последующей строкой
readln(a,b,c); // Вводимые переменные (стороны)
if (a=b) and (a=c) and (b=c) then // Условие
writeln('Треугольник равносторонний')
else
writeln('Треугольник не равносторонний');
readln;
<span>end.</span>