Расскажите об операции логического умножения​

// PascalABC.NET 3.3, сборка 1579 от 18.11.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var x:=ArrGen(8,i->Ln(i+1.1)); x.Println;
  var k:=x.Where(t->(Sin(t)>-0.5) and (Sin(t)<=0)).Count;
  var im:=x.IndexMin;
  Writeln('На указанном интервале найдено элементов: ',k);
  Writeln('Минимальный элемент массива, равный ',x[im],
      ' имеет порядковый номер ',im+1)
end.

Результат
0.0953101798043249 0.741937344729377 1.1314021114911 1.41098697371026 1.62924053973028 1.80828877117927 1.96009478404727 2.09186406167839
На указанном интервале найдено элементов: 0
Минимальный элемент массива, равный 0.0953101798043249 имеет порядковый номер 1

ответ

4,0/5

10

garfild214

ученый

236 ответов

96.5 тыс. пользователей, получивших

Будем сравнивать в десятичной системе, для начала переведём все числа и сравним

1)

1101  =  1*2^3 + 1*2^2 + 0*2^1 + 1*2^0 = 13

D = это 13 по порядку

13 = 13

значит 1101 = D

2)

0.11111 = 1*2^-1 + 1*2^-2 + 1*2^-3 + 1*2^-4 + 1*2^-5 = 0.96875

0.22  =  2*8^-1 + 2*8^-2 = 0.28125

0.96875 > 0.28125

значит  0.11111 (2) > 0.22 (8)

3)

35.63 (8) = 3*8^1 + 5*8^0 +6*8^-1 + 3*8^-2 = 29.796875

16C (16) = 1*16^2 + 6*16^1 + 12*16^0 = 364

29.796875 < 364

значит 35.63 (8) < 16C (16)

Объяснение:

можно лучший ответ?))