Выделите красным контуром ложные высказывания, зелёным-истинные

101=1*8^0+0*8^1+1*8^2=1*1+0+64=(65) в десятичной

1в=в*16^0+1*16^1=12*1+1*16=12+16=28 в десятичной

65-28=37

38 в десятичной , но такого ответа нет, значит надо перевести 37 в двоичную систему. для этого 38 делим на 2 пока делится

38/2=19 остаток0

19/2=9 остаток 1, уже видно что двоичный второй ответ не подходит, там нет нуля.

  попробуем переведем в восьмеричную, для этого делим 38 на 8.

38/8=4 остаток 6, получается 46 в  8 сс.  ответ 4 

1)

var

i,k: integer;

a: array [1..14] of integer;

begin

k: =0;

for i: =1 to 14 do

begin

a[i]: =random(46)-15;

write(a[i]: 3);

if a[i] mod 2=0 then k: =i;

end;

if k> 0 then

begin

for i: =k to 13 do a[i]: =a[i]+1;

a[14]: =0;

end;

writeln;

for i: =1 to 14 do write(a[i]: 3);

end.

2)

var

i,k: integer;

a: array [1..14] of integer;

begin

for i: =1 to 14 do

begin

a[i]: =random(46)-15;

write(a[i]: 3);

end;

for i: =1 to 7 do

begin

k: =a[i];

a[i]: =a[i+7];

a[i+7]: =k;

end;

writeln;

for i: =1 to 14 do write(a[i]: 3);

end.

3 базовых цвета

2 бита - 4 варианта 

4*4*4=64 цвета