Var
a,b,c:real;
begin
Read(a,b,c);
if (a=b) and (a=c) then Writeln('Треугольник равносторонний')
else Writeln('Треугольник не равносторонний')
end.
<u>Пример</u>
15 15.0 15.0000
Треугольник равносторонний
var
m,n,mx:integer;
begin
Read(m,n);
if m>0 then
if m>n then n:=m else m:=n
else begin m:=0; n:=0 end;
Writeln('m=',m,', n=',n)
end.
<u>Пример</u>
7 2
m=7, n=7
Ответ: Между 2 и 3 битами ( Если вас просят назвать минимальное количество битов для хранения данной информации - 3 бита, берем в большую сторону)
Решение:
Дверь можно открыть такими ключами:
1-2 2-3 3-4
1-3 2-4
1-4
Считаем, всего получилось 6 комбинаций = N
N=2i
22 = 4 ( 6 не входит в этот диапазон)
23 = 8 (6 входит в этот диапазон)
Итого: между 2-3 битами.
.....................................