Var a,b,x,y,z,m: real;
Begin
Write ('Размеры отверстия a,b=');
Read(a,b);
Write ('Размеры кирпича x,y,z=');
Read(x,y,z);
if a>b then begin m:=a; a:=b; b:=m end;
if x>y then begin m:=x; x:=y; y:=m end;
if x>z then begin m:=x; x:=z; z:=m end;
if y>z then begin m:=y; y:=z; z:=m end;
if (x>=a) or (y>=b) then
write('Кирпич не пройдет через отверстие')
else
write('Кирпич пройдет через отверстие');
end.
Пример:
Размеры отверстия a,b=3 4
Размеры кирпича x,y,z=4 3 2
2 3 4
Кирпич пройдет через отверстие
<span>c. 0+0=0, 1+0=1, 0+1=1, 1+1=0
5.</span>100110101002 на 11002≈9099263
9099263₁₀=1000 1010 1101 0111 1111 1111₂
<span>
</span>
Когда её удаляют.(в компьютере) ,когда компьютер очищают. Если в жизни ,то когда что то рвут или сжигают.
Могут, Римская система счисления: I, V, X; системы счисления с основанием 8, 16 и пр.