В терминологии сетей TCP/IP маской сети называется двоичное число, определяющее, какая часть IP-адреса узла сети относится к адресу сети,
а какая – к адресу самого узла в этой сети. При этом в маске сначала
(в старших разрядах) стоят единицы, а затем с некоторого места – нули.
Обычно маска записывается по тем же правилам, что и IP-адрес – в виде
четырёх байтов, причём каждый байт записывается в виде десятичного
числа. Адрес сети получается в результате применения поразрядной
конъюнкции к заданному IP-адресу узла и маске.
Например, если IP-адрес узла равен 231.32.255.131, а маска равна
255.255.240.0, то адрес сети равен 231.32.240.0.
Узлы с IP-адресами 98.162.71.150 и 98.162.71.140 находятся в одной сети.
Чему равно наибольшее количество возможных единиц в маске этой сети?

Const
  n = 15;

var
  a: array[1..n] of integer;
  i: integer;

begin
  Randomize;
  Writeln('Элементы массива');
  for i := 1 to n do
  begin
    a[i] := Random(61) - 30;
    Write(a[i]:4);
    if a[i]>0 then a[i]:=2*a[i]
    else
      if a[i]<0 then a[i]:=7
  end;
  Writeln;
  Writeln('После преобразования');
  for i := 1 to n do Write(a[i]:4);
  Writeln
end.

Тестовое решение:
Элементы массива
 -20  15  16  20   0  16 -15  -1  -2  21  -8 -10   4 -24   1
После преобразования
   7  30  32  40   0  32   7   7   7  42   7   7   8   7   2

Главные цели создания распространения бесплатного софта выглядят так:Цель 1: Поиск работы разработчиком. Многие программисты создают и распространяют бесплатный софт в надежде, что программу оценят и им дадут крупный заказ. Вполне себе коммерческая цель.Цель 2: Продать написанный софт. Многие бесплатные программы со временем могут стать весьма популярными, при условии, что они хорошие. Крупные фирмы часто выкупают права на использования программ, которые завоевали популярность не только своей бесплатностью, но и удобством.Цель 3: Реклама себя и своей платной продукции. Разработчики бесплатного софта часто параллельно занимаются созданием платных программ. А бесплатно распространяющаяся программа это с одной стороны реклама разработчика, а с другой стороны, на бесплатных программах часто показывается коммерческая реклама, за которую заплачены деньги.Цель 4: Изменение статуса программы. Многие программы, добившись популярности и признания, сначала становятся условно платными, а потом и полностью переходят в состояние платных.Цель 5: Продвижение иных программных продуктов. Бесплатные программы часто распространяются с целью продвижения какого-либо языка программирования и т.д.Цель 6: Антимонопольная. Некоторые крупные фирмы специально создают и распространяют бесплатный софт для того, чтобы избежать обвинений в монополии в определённой доле рынка занятой программным обеспечением. Так что многие пользователи этих самых программ сильно бы удивились, узнав, кто стоит за их продвижением.