Код полностью
//PascalABC.NET 3.1 сборка 1239
var
a, b, c: integer;
begin
a := 9;
b := 3;
c := 1;
while not (a = b) do
begin
c := c + (a - b);
a := a - 1;
b := b + 1;
{Println(a, b, c);}
end;
writeln('c=',c);
{2}
a := 10;
b := 2;
while not (a <5) do
begin
b := b + 10-a;
a := a - 1;
{Println(a, b, c);}
end;
writeln('b=',b);
end.
Вывод программы
c=13
b=17
Номера 1 и 4.
Маски имеют вид 255.255.255.0, значит под хост выделен последний байт маски, а первые три байта - под адрес сети.
Первые три байта у 1 и 4 IP-адресов одинаковые, значит адрес сети тоже один.
Перевел всё в К<span>байт
7) 0.001 </span>Кбайт<span>
4) 0.12825 </span>Кбайт<span>
2) 1.02425 </span>Кбайт<span>
3) 1 </span>Кбайт<span>
5) 1.028 </span>Кбайт<span>
6) 8 </span>Кбайт<span>
1) 8.194 </span>Кбайт
101000001
321 в двоичной системе
2 в 4 степени = 16, слеловательно: 7*4= 28 бит