A) A = -11010 = -0011010
B = 1001111
Aобр = 1,1100101
Вобр = 0,1001111
Адоп = 1,1100110
Вдоп = 0,1001111
А+Вобр = 0,0110100
А+Вдоп = 0,0110101 -ответы в прямом коде, они разные, т.к. нужна коррекция
дальше лень решать
Uses Crt;
const
n=30;
type
tA=array[1..n] of integer;
tS=array[1..n] of string[30];
var
i:integer;
p,c:tA;
s:tS;
begin
ClrScr;
for i:=1 to n do begin
Write('Марка автомобиля ',i,': ');
Readln(s[i]);
Write('его мощность (л.с.) и стоимость (руб.); ');
Readln(p[i],c[i])
end;
Writeln;
Writeln('Автомобили мощностью не более 80 л.с.');
for i:=1 to n do
if p[i]<=80 then Writeln(s[i]:30,p[i]:10,c[i]:10);
ReadKey;
end.
10 переведи в 4чную систему счисления, сосчитай кол-во разрядов и вот ответ, но т.к. ты ленивый, то 10 это 22, 2 разряда, значит нажимать нужно 2 клавиши, если нажимать 2 клавиши, то можно 15 разных символов ввести