Program kBt;
uses crt;
var
kBte,kBt1,sum:real;
begin
clrscr;
writeln('vvedite lo-vo KBt: ');
read(kBte);
writeLn('vvedite cenu za 1 KBt: ');
read(kBt1);
sum:=kBte*kBt1;
writeln('Neobhodimo oplaltit ',sum);
readln;
end.
1280 или тупо переводим в 2сс или просто представляем в виде сумм чисел 2 в опред. степени( столько будет 0 + одна1)
=1024+128+64+32+8+4
всего 5 единиц
689=519+128+32+8+2 тоже 5 единиц
10110111=128+32+16+7=
245 в 2сс =1110101