1)для узла с IP-адресом 111.91.200.28 адрес сети равен 111.91.192.0. Найдите наименьшее...

Question

1)для узла с IP-адресом 111.91.200.28 адрес сети равен 111.91.192.0. Найдите наименьшее возможное количество нулей в двоичной записи маски подсети.
2)для узла с IP-адресом 132.47.160.46 адрес сети равен 132.47.160.0. Для скольких различных значений маски это возможно?
3)в программе используется одномерный целочисленный массив а с индексами от 0 до 9. Значения элементов равны 1,17,83,34,35,76,89,77,98,99,то есть А{0}=1,A{1}=12 и так далее. Определите значение переменной S после выполнения следующего фрагмента программы
s:=10;
n:=5;
for i:=1 to n-1 do begin
s:=s+A{i}*A{1} - A{i-1}*A{i-1};
end;

Answer 1

Задача №1
адрес сети равен 111.91.192.0, определим количество разрядов под номер компьютера, 
111.91.192.0192.0(10) = 11000000.00000000(2)
там где 0 в разрядах это номер ПК.
Это максимальный номер может быть из 14 разрядов.
111.91.200.28 - он отличается последними 200.28
200.28(10) = 11001000.00011100(2).
Сравниваем две записи в двоичной форме 
  192.0(10) = 11000000.00000000(2)
200.28(10) = 11001000.00011100(2).
IP адрес задействует разряды во всем диапазоне 14 разрядов.
Единица стоит в следующем разряде за сетевым адресом,
поэтому не возможно сократить число нулей. В маске необходимо задействовать все 14 разрядов. Маска = 255.255.192.0 

Задача №2
Адрес сети равен 132.47.160.0, определим количество разрядов под номер компьютера, 
132.47.160.0.
160.0(10) = 10100000.00000000(2)
там где 0 в разрядах это номер ПК.
Это максимальный номер может быть из 13 разрядов.
Рассмотрим IP адрес и определить минимально возможное количество 0 132.47.160.46 - он отличается последними 46
160.46(10) = 10100000.00101110(2).
Сравниваем две записи в двоичной форме 
  160.0(10) = 10100000.00000000(2)
160.46(10) = 10100000.00101110(2).
IP адрес задействует разряды в конце адреса 6 разрядов. 
Маской можно регулировать количество ПК от 62 штук
тогда маска=255.255.255.192 
Если задействовать 13 разрядов под адрес ПК. Маска = 255.255.224.0 

Задача №3
const A:array[0..9] of integer =(1,17,83,34,35,76,89,77,98,99);
var i,s,n:integer;
begin
s:=10;
n:=5;
writeln('i':3,'A[1]':5,'A[i]':4,'A[i-1]':3,'s':3);
for i:=1 to n-1 do
begin 
s:=s+A[i]*A[1] - A[i-1]*A[i-1];
writeln(i:3,A[1]:4,A[i]:4,A[i-1]:5,s:6);
end;
write('s=',s);
end.

---