Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
var
x: array[1..15]of integer;
i,min,z: integer;
begin
min: =32000;
z: =0;
for i: =1 to 15 do
readln(x[i]);
if x[i]> 0 then if x[i]< min then min: =x[i];
if x[i]=0 then inc(z);
end;
writeln(min);
writeln(z);
end.
-32=-100000
прямой код 10100000
обратный код 11011111
дополнительный код 11100000
-102=-1100110
прямой код 11100110
обратный код 10011001
дополнительный код 10011010
-126=-1111110
прямой код 11111110
обратный код 10000001
дополнительный код 10000010
Популярные вопросы