1.
а) 111000111=455
б) 11011.01=27.25
2.
164=<span>10100100
3.
23CE=</span><span>10001111001110
Остальные не смогу.
</span>
<span>Ans: 17,179,869,184 бит -> 2^34</span>
Метод подбора предельно прост и туп. В первой колонке набрасываешь ряд чисел, к примеру, от -10 до 10 (потом при необходимости изменишь масштаб). Во второй пишешь само уравнение (в твоём случае: "=A1^2+3*A1-3-1"). Протягиваешь на ту же высоту. Ищешь, где оно равно или наиболее близко к нулю. Так, сразу стало видно, что корни этого уравнения: -4 и 1.
А)M mod 2 = 0
Т.к. остаток деления четного числа на 2 должен равняться 0
Var
N:integer;
P:real;
Begin
Write('N = ');
ReadLn(N);
P:=1;
For N:= 1 to N do
P:=P*(N*2-1)/(2*N);
WriteLn('P = ',P:0:5)
End.
N = 50
P = 0.07959
N = 100
P = 0.05635
N = 200
P = 0.03987