Объекты то какие? Давай примерчик приведу свой.
Телевизор, электричество, провод
Телевизор работает от электричества, а электричество поступает по проводу.
Вот так вот....
//PascalABC.NET 3.2 сборка 1318
function MaxFrom3(a,b,c:integer):integer;
Var
max:integer;
begin
max:=a;
if max<b then max:=b;
if max<c then max:=c;
MaxFrom3:=max;
end;
function MinFrom3(a,b,c:integer):integer;
Var
min:integer;
begin
min:=a;
if min>b then min:=b;
if min>c then min:=c;
MinFrom3:=min;
end;
Выше ответ более простой, но может Вам нужно что-то сложное?
Например:
1) 10101(2)<span> = 1∙2^</span>4+0∙2^3+1∙2^2+0∙2^1+1∙2^0<span> = 16+0+4+0+1 = 21(</span>10)
2) 11101(2)<span> = 1∙2^</span>4+1∙2^3+1∙2^2+0∙2^1+1∙2^0<span> = 16+8+4+0+1 = 29(</span><span>10)
3) </span>01010(2)<span> = 0∙2^</span>4+1∙2^3+0∙2^2+1∙2^1+0∙2^0<span> = 0+8+0+2+0 = 10(</span>10)
4) 11111(2)<span> = 1∙2^</span>4+1∙2^3+1∙2^2+1∙2^1+1∙2^0<span> = 16+8+4+2+1 = 31(</span><span>10)
5) 01110(2) = </span>0∙2^4+1∙2^3+1∙2^2+1∙2^1+0∙2^0<span> = 0+8+4+2+0 = 14(</span>10)
<span>10101(2) - 10101 в двоичной системе счисления
21(10) - 21 в десятичной системе счисления
1*2^4 - 1 умножить на 2 в четвёртой степени
* - знак умножить</span>
Сзади нужно поднести большой магнит или приклеять
2) х/11=22/1
х=22*11=242
х/10=21/1
х=21*10=210
242-210=32
3)из 12 в 8, потом из 8 в 5 , потом из 5 выливаем обратно в 12, затем из 8 выливаем 3 оставшихся пинта от предыдущего перелива в 5, снова набираем 8 и доливаем из него в 5
и в итоге в 8 останется 6 пинт
4)