Запишите 32-битный ip-адрес в виде четырех десятичных чисел разделенных точками: 1)11110100011000000110011001100 2)10011101110101101101110001011

1) "11110100011000000110011001100"

запишем 32-значное двоичное число без лишних знаков. при необходимости добавляем ведущие нули

"00011110100011000000110011001100"

разделим на 4 группы по 8 цифр и переведем их в 10ричную сс

00011110{2} = 30{10}

10001100{2} = 140{10}

00001100{2} = 12{10}

11001100{2} = 204{10}

ip = 30.140.12.204

2) "10011101110101101101110001011"

запишем 32-значное двоичное число без лишних знаков. при необходимости добавляем ведущие нули

"00010011101110101101101110001011"

разделим на 4 группы по 8 цифр и переведем их в 10ричную сс

00010011{2} = 19{10}

10111010{2} = 186{10}

11011011{2} = 219{10}

10001011{2} = 139{10}

ip = 19.186.219.139

1) чтобы точно вынуть черный, нужно вынуть 6 шаров, т.к. первые 5 могут оказаться белыми

2)аналогично, 4 шара

3)7 шаров

4)5 шаров

program xxx;

    var i, n : integer;

                      s : real;

                    a : array [1..20] of real;

begin

  writeln('введите размерность массива n=');

  readln(n);

  write('введите элементы массива а: ');

  for i: =1 to n do

        readln(a[i]);

  writeln('исходный массив а: ');

  for i: =1 to n do

        writeln(a[i]);

  s: =0;

  for i: =1 to n do

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

  writeln('сумма четных элементов =', s);

  readln

end.