№3 13₄=111₂ прямой код:00000111 21₁₀=10101₂ прямой код: 00010101 156₁₀=10011100₂ прямой код: 10011100 №4 20₁₀= 10100₂ прямой код: 00010100, обратный код и дополнительный код такие же: 11101100 -66₁₀=-100010₂ прямой код:10100010, обратный код: 11011101, дополнительный код:11011110 -18₁₀=10010₂ прямой код: 10010010, обратный код: 11101101, дополнительный код: 11101110 №3а 20467₁₀=100111111110011₂, прямой код: 0100111111110011 19491₁₀=100110000100011₂, прямой код: 0100110000100011 №4а 27343₁₀=110101011001111₂, прямой код: 0110101011001111, дополнительный и обратный код такие же -22291₁₀=-101011100010011₂, прямой код: 1101011100010011, обратный код: 1010100011101100, дополнительный код: 1010100011101101
Везде, начиная с того что даже f написана не верно вот рабочий код. Формулы брались на вики, потому что в ваших я сомневаюсь весьма
function F(x: real): real; begin f := sqr(sqr(x)) * x + 3 * sin(x) - 3 * sqr(x) - 12; end;
function FindRoot(a, b, epsilon: real): real; begin while(abs(b - a) > epsilon) do begin a := b - (b - a) * f(b) / (f(b) - f(a)); b := a + (a - b) * f(a) / (f(a) - f(b)); writeln(a, ' ', b); end;
FindRoot := b; end;
begin writeln('x = ', FindRoot(0.5, 1.5, 0.001)); end.
i, min, a, n: integer;
begin
min := trunc(power(2, 31) - 1);
readln(n);
for i := 1 to n do
begin
readln(a);
if (a < min) then
min := a;
end;
writeln(min);
end.