4. Двоичный код 1111 0001 1101 0000 1111 0001 1001 1110 1101 0000 содержитБайта или бита​

ответ: 5 байтов или 40 бит

Объяснение: каждый символ двоичного кода кодируется 1 битом. Всего 40 символов. 1 байт=8 бит

PascalABC

Объяснение:

1)

begin

   WriteLn('Введите размер массива N: ');

   var n := ReadInteger;;

   var a := ArrRandomInteger(n, -20, 20);

   a.PrintLn;

   WriteLn('Сумма элементов, которые оканчиваются на число 2, равна ', a.Where(x -> (x mod 10 = 2) or (x mod 10 = -2)).Sum);

end.

2)

begin

   var a := ArrRandomInteger(10, -10, 10);

   a.PrintLn;

   WriteLn('Индексы отрицательных нечетных элементов:');

   foreach var i in a.Indices do

     if (a[i].IsOdd) and (a[i] < 0) then Write(i, ', ');

end.

program Geom;

program Test_nn;

{$APPTYPE CONSOLE}

{$R *.res}

uses

 Math;

var

 a: array of Extended;

 n, i, c: Integer;

 x: Extended;

begin

 Write ('Размерность массива = ');

 ReadLn (n);

 SetLength (a, n);

 Randomize;

 for i := Low (a) to High (a) do begin

   a [i] := (Random (2001) - 1000) / 1000;

   Write (a [i] :7 :3);

 end;

 x := 1;

 c := 1;

 WriteLn;

 for i := Low (a) to High (a) do begin

   if a [i] > 0 then begin

     Write (a [i] :7 :3);

     x := x * a [i];

     Inc (c);

   end;

 end;

 WriteLn;

 WriteLn ('Среднее геометрическое = ', Power (x, 1/c) :20 :15);

 ReadLn;

end.